ISSN • 0T4*-M11 



THE COMPUTER JOURMAL 

For Those Who Interface, Build, and Apply Micros 



lisue Number 23 March- April, 1986 



The C Column 

Flow Control and Program Structure page 3 

The Z Column 

Getting Started With Directories and User Areas page s 

The SCSI Interface 

Introduction To SCSI page 7 

NEW-DOS 

Part 2: The Console Command Processor, Continued page 10 

Editing The CP/M Operating System pagezs 

INDEXER 

Turbo Pascal Program To Create Index For Almost Any Purpose page 28 



The AMPRO Little Board Column 



The Computer Corner P a g eS2 



page 33 



$3.00 U.S. 



The Computer Journal / Issue #23 



THE COMPUTER JOURNAL 

190 Sullivan Crossroad 

Columbia Falls, Montana 

59912 

406-257-9119 



Editor/Publisher 

Art Carlson 

Art Director 

Donna Carlson 

Production Assistant 

Judie Overbeek 

Circulation 

Donna Carlson 

Contributing Editors 

Nell Bungard 

C. Thomas Hilton 

Donald Howes 

Jerry Houston 

Bill Kibler 
Rick Lehrbaum 



The Computer Journal* is a bimon- 
thly magazine for those who interface, 
build, and apply microcomputers. 

The subscription rate is $14 for one 
year (6 Issues), or $24 for two years (12 
Issues) in the U.S., $22 for one year in 
Canada and Mexico, and $24 (surface) 
for one year in other countries. All fun- 
ds must be in US dollars on a US bank. 

Entire contents copyright © 7986 by 
The Computer Journal. 

Advertising rates available upon 
request. 

To Indicate a change of address, 
please send your old label and new ad- 
dress. 

Postmaster: Send address changes 
to: The Computer Journal, 190 Sullivan 
Crossroad, Columbis Falls, Montana, 
59912. 

Address all editorial, advertising and 
subscription inquiries to: The Com- 
puter Journal, 190 Sullivan Crossroad, 
Columbia Falls, MT 59912. 



Editor's Page 



Battle of the Bits 

We are being asked to choose between 
8-bit systems (usually Apple* or 
CP/M® ) and 16-bit systems (usually 
IBM PC® compatible) . The matter is not 
really choosing between them, but rather 
selecting the best tool for the task. 

We at TCJ are not ignoring or fighting 
the 16-bit MSDOS® machines— they are 
often the best choice because of the sof- 
tware available. When a non- 
programmer who has an older CP/M 
machine asked my advice on buying ac- 
counting and inventory management sof- 
tware for his system, I advised that it 
would be better to buy an IBM clone plus 
the software than it would be to buy the 
software for his CP/M machine. He 
needs software, and the best software 
with the best support at the best price is 
available for the MSDOS machines. On 
the other hand, I see no reason to replace 
my Z-80 systems for writing, editing, 
typesetting or managing our subscriber 
data base while the existing software is 
doing a satisfactory job. I probably will 
get an AMPRO 186 system (80186 CPU) 
in order to run some of the great software 
utilities for Turbo Pascal® , C program- 
ming, and to be able to use the 8087 
coprocessor— but I will continue to use 
my three Z-80 ZCPR3 systems too! I'll 
get the 16-bit system not for the system, 
but rather because the programs I need 
are written for it. 

The reason that I am choosing the 
AMPRO 186 instead of an IBM clone is 
that I don't need hi res graphics or sound, 
but I do need a well built high quality 
system with lots of I/O capability. The 
AMPRO uses a serial ASCII terminal 
which is much faster than bit-mapped 
graphics for character oriented writing 
and editing; plus it has extra ports for 
RS-232 and a parallel printer, a connec- 
tor for two more floppy drives, and a 
powerful SCSI/PLUS* interface port. 

Operating Systems 

One of the reasons that Tom Hilton and 
I will continue to support the 8-bit CP/M- 
like systems is that the operating system 
is a program on disk and we can modify 
it, or even write our own operating 
system. Many people are satisfied using 
the operating system supplied by 
someone else, but others have the need to 
be able to change the system to "Do it my 
way." As Tom says "If you cannot make 
the system do as you want it to, there is 
no purpose in having a computer." I have 
some odd-ball interests which are en- 



tirely different than what the system 
designers had in mind, and I need to be 
able to write a system to do what I want, 
the way I want to do it. 

In fact, I have a number of applications 
which need different operating systems. 
Where did we ever get the idea that we 
should only have one version of an 
operating system for all of our uses? One 
of the greatest faults with CP/M is that it 
was designed with the idea that an OEM 
or system implementor would configure 
the BIOS once, and the user would use it 
for ever more — or else they would hire a 
system implementor to reconfigure it 
and then use only the revised system. 



"If you cannot make the 
system do as you want it to, 
there is no purpose in 
having a computer." 



The idea of one unchangeable con- 
figuration does not meet today's needs 
when we may want to choose between 
three or four different output devices. 
Perhaps we want to send a rough draft to 
a parallel port for the dot matrix printer, 
send the final version to a serial port for 
the daisy wheel printer, send a copy to 
another serial port for the modem for 
transmission to another office, and then 
send the next document to a lazer prin- 
ter. CP/M is not designed to handle this, 
perhaps one of our MS DOS experts can 
tell us how it can be done with that 
system. It CAN be done with a Z-80 
system working thru the SCSI interface 
or an S-100 system with extra I/O cards. 
The S-100 systems are not popular now, 
but they do offer almost unlimited I/O 
which is the weakest area in the IBM PC 
compatibles. The PS's are intended for 
the normal office environment where 
they serve one printer and a modem. 
While they do have an open bus with 
slots, I don't think that they are practical 
where you want three or four parallel I/O 
ports (full bidirectional latched input and 
output, not just output as implemented in 
most parallel printer ports) plus six or 
eight series ports (some of which will 
need 20ma current loop drivers) I feel 
that the only suitable systems for these 
applications are S-100 with a a slot 
mother board, SCSI Plus, or one of the 
industrial buses. 
Yes, I realize that programs I write to 
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run on my modified operating systems 
will not be portable because they won't 
run on anyone else's system. I don't 
care! I'm writing what I need to do what 
I need done, and a non-portable package 
which does my job effectively is a lot bet- 
ter than a portable program which does 
the job poorly. The operating system is 
not sacred and I intend to mess with it. If 
what I develop does the job so much bet- 
ter than anything else that someone else 
wants to use it, they can .buy the same 
hardware and use my package which in- 
cludes the operating system. One nice 
thing about using your own operating 
system is that you can supply it to others 
without paying a license fee, and it can 
be designed to be implemented in ROM 
for dedicated controllers. The operating 
system and the application software are 
both programs, and as they are in- 
tegrated to work closely together the dif- 
ferences between the system and the 
program become less distinct and they 
can be merged— if the system source 
code is in the public domain. You can 
strip out the non-essential portions (some 
ROMed applications won't have drives), 
combine it with the program, and end up 
with one combined file. Would you call 
that an operating program? 

Why NEW-DOS? 

Some people have questioned whether 
there is a need for another operating 
system, and we want to explain our 
reasons for publishing the NEW-DOS 
series. One of the primary reasons for 
the NEW-DOS is educational. Our goal is 
to show you how an operating system 
works, how it is written, and enable you 
to write or modify an operating system. I 



feel that at the current time, operating 
systems should be written in assembler, 
and Tom's step-by-step program 
development with source code and a 
public domain assembler will demon- 
strate that assembler is not as difficult as 
commonly reported for this application 
(I wouldn't want to write floating point 
math, array, or string handling routines 
in assembler unless they were intended 
for large volumn distribution) . Therefore 
part of our eduational goal is to en- 
courage you to learn how to use assembly 
language. 

Another reason is to provide a free 
CP/M compatible system which can be 
included on our (or your) distribution 
disks. It is important that source code 
with step-by-step instructions are 
available so that you can fully under- 
stand how to modify the system. For nuts 
like me another reason is to provide a 
small system nucleus which we can 
change, expand, condense, or whatever 
for specific non-standard applications. 

We chose a CP/M like system because 
its features are well documented, and it 
represents a minimum system which is 
useful for a teaching tool, yet simple 
enough to understand. I doubt if many 
would want to follow a series on writing a 
UNIX* equivalent. The knowledge 
gained from this project will enable you 
to modify other systems, such as ZCPR3 
or MS DOS* . In fact, I'd like to 
challenge MS DOS advocates to author a 
series on writing a public domain 
equivalent, or at least modifying it (in- 
cluding modifying the ROM's) . 

I'll probably use ZCPR3 on the AM- 
PRO for the development system 
because of the power of the system and 
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the large number of utilities they supply, 
and their upcoming multitaskinp and 
banked/partitioned versions plus "ZC- 
PR3: The Libraries" will facilitate the 
programming which will mostly be done 
in assembly. Licenses from Echelon are 
very inexpensive, they supply the source 
code for almost everything, they con- 
stantly expand and update their produc- 
ts, offer outstanding support, and have 
released about 2 million bytes of code 
which is on over fifty Z-Nodes and has 
been given to SIG . 

Source Code Required 

The availability of source code from 
Echelon brings up another very impor- 
tant point. I don't intend to use programs 
unless I have the source code. There are 
a few exceptions— I'm currently using 
WordStar* and Condor3* for which the 
source code is not available, but 111 have 
to disasseble portions of their code to 
make some very minor (but very 
necessary) changes which would be easy 
if I had the source code. There are other 
programs such as Turbo Pascal* , C 
compilers, DSD 80* , and the SLR 
Systems assembler and disassembler for 
which I wouldn't expect the code. But in 
these cases there are other programs 
which could be used with my source files. 
I don't want to trust my accounting, 
database, or other files to copy protected 
software without the source code. Some 
users are reporting problems with copy 
protected programs because the com- 
panies have gone out of business and 
crashed disks can no longer be replaced. 
My goal is to use software where the 
source code is available whenever 
possible, I won't even consider using 
copy protected programs. 

The Next Hacker's Bus? 

While programmers can write sof- 
tware for their own use with little regard 
to what the rest of the industry is doing, 
Hardware Hackers have to design 
around what is available in the industry. 
We read the professional engineering 
magazines (Electronic Design, EDN, 
Electronic Engineering Times, etc) to 
keep up with current events and future 
trends, and have been paying particular 
attention to the buses being used for in- 
dustrial applications. The STD bus is one 
of the older buses still in active use, and 
has been upgraded to include MS-DOS* 
compatible operation with the 8088. 
Multibus 3 (Intel) has been redesigned 
as MultibusII* , and both versions are 
active. The bus with the greatest activity 
is the VMEbus* , and the most frequen- 
tly used CPU is the 68020. We can't 
always afford the latest state of the art 
products for our personal projects, but 
quite often hardwarefrom industrial 

( Continued on page 6) 
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TheC Column 

Flow Control and Program Structure 

By Donald Howes 



The use of the C programming language is spreading 
rapidly through the microcomputer community. Once thought 
to be restricted to the area of "systems" programming, it has 
spread to become a dominant language in the development of 
applications programs as well. Uses include such diverse areas 
as word/text processing, statistical analysis, graphic display 
and artificial intelligence applications. 

Hi, my name is Don Howes, and I'd like to welcome you to the 
kick-off of The C Column. In this column, I'll be looking at some 
of the tricks and giving you some tips for writing fast, efficient C 
code, which you can apply in your own programming. I'll also 
try to pass on to you any news that I gather about changes in 
popular versions of C compilers, as well as news about the ANSI 
C Standards committee (which has already had an impact on 
new compiler releases) . 

But about the C language, just why has it become so popular? 
Here are a couple of reasons drawn from my own previous 
programming background in FORTRAN and Basic, which may 
shed some light for people who have never used the language, or 
have been put off by the cryptic appearing syntax. 

Modern Control Flow 

This may not seem like all that much, but it is hard to explain 
just how restrictive it is to be confined to IF-THEN-ELSE and 
DO-loop (or FOR-NEXT loop) constructs, when other types 
have become available (we won't talk about GOTO's, since it is 
my biased opinion that their use leads to spaghetti code, and 
that mentioning GOTO and control flow in the same sentence is 
a contradiction in terms). The C language has if-eise ("then" is 
not used in the language) and do while (equivalent to DO or 
FOR-NEXT constructs), but in addition includes while, for and 
switch statements. I have demonstrated some of these in a short 
(rather useless) program (Figure 1). 

What the program does is to read character input from the 
keyboard, and keeps a running count of lower and uppercase e's, 
which are reported after the user has indicated the end of input 
by typing CNTRL-Z (the CP/M end of file marker). The 
program could be improved by adding the capability of 



checking for entry of a backspace character (which could 
remove one of the previously counted e's), but that would add 
some complications to what is only an example program. In the 
program, I have used both the while and switch constructs to do 
the counting. The while statement performs a loop until the test 
condition present at the beginning of the loop is satisfied, at 
which point the loop is terminated. The nice thing about a while 
loop is that the test condition is checked prior to the beginning of 
each loop (unlike a DO loop or a FOR-NEXT loop, which tests at 
the bottom of each loop) . This means that the loop is not entered 
if the test condition is met immediately (in this case, if the first 
character entered is EOF) . 

Internal to the while loop is the switch statement. What a swit- 
ch does is take the value of a variable (in this case, the variable 
'c') and compares that value to the cases listed. Here I am 
checking for upper and lower case e's, all other values for the 
variable (all other ASCII characters) will fall through the swit- 
ch. When one of the cases is found to be true, the code following 
the colon is executed. The break statement is needed to prevent 
the program from falling through to the next case and executing 
the code (the 'case' is just a label, not an executable statement) . 
Break causes an immediate exit from the switch . 

Program Structure 

This means more than just what the code looks like, but goes 
to the heart of program development using the C language. 
While it is, of course, possible to write structured (or for that 
matter, unstructured) code in any language, some languages 
lend themselves more easily to the task. While there has been a 
lot of talk in the computer magazines, it does bear repeating 
that structured code is easier to maintain and extend than an 
equivalent unstructured program. This is due to the logic of the 
programming task being explicitly detailed in the layout of the 
program. 

The C language makes structured programming easier 
through its use of functions. In this language, everything is a 
function. If you look again at Figure 1, you will see that even the 
declaration of 'main' shows it to be a function. This is shown by 
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the use of parentheses [mainO]. In this case, there are no 
arguments being passed to mainO, but there can be. The two 
possible parameters are "argc" and "argv", which are the 
number of parameters and an array of pointers to characters 
respectively This is shown in the following code fragment. Sup- 
pose you have written a simple copy program (which we will 
reasonably call copy) for copying an old file into a new file. 
What you have to pass to the copy program, therefore, is the 
names of the source and destination files. This can be done with 
the command 

copy somefile.txt newfile.bak 

In the code for the program copy the main( ) function would be 
declared as follows : 

main(argcargv) 
int argc; 
char ,argv[ ] ; 



code to do copy 



Within the code, you would use "argc" to check on the proper 
number of input parameters (that there are two filenames) and 
"argv" would hold the actual filenames of the input and output 
files. For the program to work properly, there would have to be 
a fair proportion of error checking code to make sure you 
weren't trying to copy from the source program to itself, copy 
into a file that already existed (unless you wanted to), etc. 
Writing that type of code is a column in itself, but not right now 
(as an aside, making sure that you have protected users from 
themselves is generally known as bulletproof ing. I'm sure the 
reference is to not shooting yourself in the foot. Remember 
Murphy's Law). 

The whole idea in C programming is to hide the low level fun- 
ctions from the programmer through the use of user created 
functions (in this case, the user is yourself, the C programmer). 
It has been said that the best type of C code has a main( ) fun- 
ction containing nothing but function calls, but I think this is a 
little excessive. Generally, the mainO function should only con- 
tain code that is specific to the application being written. Calls to 
functions should be generalized so that the same function can be 
used in a number of different applications and for a number of 
different data types, if that is necessary (an example of this 
would be a generic sort routine which could be used equally well 
on character, integer and floating point data). The only thing 
which the programmer should need to know about a function is 
what type of input is required and what type of output can be ex- 
pected. Everything else is a black box (it really could be magic, 
for all you want to know ) . 

Where To Go From Here? 

I think I've run on enough for one session, which is too bad, 
since there were other things that I wanted to cover, maybe next 
time. If I've managed to prick your interest in this language, 
then I'm happy, but I don't want to leave you stranded. So, here 
are some books that I've found useful when I was starting out 
and still use for reference and as sources of inspiration. 

1. Brian Kernighan and Dennis Ritchie, 1978, The C 
Programming Language (this is the bible of C programming 
[almost always referred to by its initials "K&R"] and is what 
compiler companies mean when they say a "full K&R im-. 
plementation", this book is a must) . 



2. Jack Purdum, 1983, C Programming Guide (this is the first 
book I bought on C programming, it's now into a second edition. 
I found it to be very clear, with lots of examples, I still refer to 
it). 

3. Samuel Harbison and Guy Steele, Jr., 1984, C A Reference 
Manual (this is a reference manual with a vengeance, not light 
reading but covers everything I've wanted to find. Clears up or 
at least makes explicit some of the ambiguities present in 
K&R). 

4. Brian Kernighan and P.J. Plauger, 1976, Software Tools 
(while not about C programming per se, if you want to learn 
more about the mechanics of structured programming, this is 
the book for you). 

In addition to these books, let me recommend the C Users' 
Group to you. I am a firm believer in the idea that a program- 
mer only becomes better by looking at and massaging other 
peoples code. The C Users' Group is the main organization for 
the dissemination of public domain C code, and you will have 
plenty of opportunity to learn from looking (and if you don't like 
the way it was done, have fun changing things, I have). Their 
address is 

C Users' Group 

Box 97 

McPherson, Kansas 67460 

(316) 241-1065 

Membership fees are $15.00 domestic (Canada and Mexico) and 
$25.00 overseas. They publish a newsletter about four times a 
year and have an extensive library of C code available for little 
more than the cost of the disk and mailing. Give them a call, 
you'll be glad you did. 

Next time in this column, we'll get down to brass tacks and 
look at some working, useful code. I'll be talking about filters, 
something which most people don't know how to write. We'll 
look at some simple filters to remove and replace tab characters 
and a handy little Wordstar to ASCII conversion filter. Remem- 
ber that this column is for you, so if you have any comments, 
suggestions for future topics or questions you would like me to 
address, drop me a line C/O The Computer Journal. See you 
next time. ■ 
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The Z Column 

Getting Started With Directories and User Areas 

By Art Carlson 



ZCPR3 has attracted a lot of attention, and people are 
asking "What is It?", "What Will It Do For Me?", and "How Do 
I Use It?" I asked these same questions before I started using 
ZCPR3, and the purpose of this column will be to help users 
learn how to USE an implemented ZCPR3 system. 

As Tom Hilton stated in one of his articles last issue "I never 
know where to begin, and where ever I begin I should have 
covered something else first." In presenting ZCPR3, 1 also have 
the problem of deciding where to begin. I feel that one of the 
reasons that I delayed using ZCPR3 is that the manuals and 
literature I saw were all aimed at the experienced programmer 
with page after page of highly detailed technical information on 
using ALIAS, VMENU, and other advanced features which I 
didn't even understand. The literature described what the ad- 
vanced implementor could do with ZCPR3, but it didn't tell the 
average user how to get started. In this column, I intend to cover 
ZCPR3 from an average user's viewpoint, starting with the sim- 
plest steps (just as I recently started), and slowly advancing to 
the more involved features. While the user will be the main 
focus of this column, TCJ won't neglect the advanced program- 
mer whose interests will be covered in other articles. 

One of the most confusing aspects of ZCPR3 is that it is not a 
single, well-defined, program, but rather a large assortment of 
parts from which you can choose the features you need for your 
implementation. This provides a lot of flexibility, and I intend to 
assemble several systems, each tailored for a specific use. The 
advantage of our disk based operating system is that we are not 
forced to use one system for everything, but can have different 
operating systems for different applications. 

But, before we learn to configure our own system, we have to 
understand what ZCPR3 is all about! When I received the AM- 
PRO 122 Bookshelf Computer it came with ZCPR3 installed, and 
all I had to do was boot the system disk to be up and running, so 
getting started with ZCPR3 was simple. Working with it is also 
very simple, and very rewarding. 

Getting Started With ZCPR3 

Since this column is for the beginning user who wants to know 
how to use ZCPR3, I will assume that you have it up and run- 
ning. You can either get an installed version (such as AMPRO) , 
get someone to help you install it, install it yourself, or get 
Echelon's self-installing version. Later we'll talk about in- 
stalling different features, but right now we'll learn how to use 
its basic features, and how it differs from CP/M* . Our exam- 
ples will be from the AMPRO disk A60101, plus information from 
"ZCPR3 The Manual" by Richard Con (this book is available 
from Echelon and is essential for understanding ZCPR3. ) The 
AMPRO implementation comes up with a MENU installed by 
SHELL, but that's not where we are going to start. You can 
either use the MENU for now, or if you're familiar with CP/M, 
just enter a control C to exit to ZCPR3 without the menu feature. 

Directories and USER Areas 

One of the first advantages of ZCPR3 that you will encounter 
is that you can access programs and display the directories 
from other drives and user areas. I feel that this feature alone is 
enough to justify replacing CP/M with ZCPR3. 

Many CP/M users never use the USER area feature because 
of the very poor implementation under CP/M 2.2. For those who 



aren't familiar with it, I'll start by describing the CP/M im- 
plementation so that you can understand ZCPR3's advantages. 
Both CP/M and ZCPR3 maintain only one directory on the disk, 
and the files from the different user areas are all combined in 
this one directory with the user area indicated in the disk direc- 
tory (byte of the disk directory entry for the adventurous who 
want to do some snooping) . 

With CP/M 2.2, you can only access files or read the direc- 
tories for the current user area. When you boot the system, you 
start out in user area ( zero) . In order to access a different user 
area, say user area four, you can enter "USER 4" followed by a 
return. Now you can read the user area four directories of any 
drives on the system, and you can use the files in user area four, 
but you can't access files or directories in other user areas. You 
have to use PIP.COM to transfer the files you want to use into 
the user area, but you can't transfer files into the user area 
unless PIP.COM is already there! How do you put PIP into the 
user area in the first place? You have to log into an area where 
PIP is present, use DDT to load PIP.COM, write down the 
decimal number of pages as reported by DDT, enter GO to 
return to CP/M, enter the the desired user area (such as USER 
4), then SAVE XX PIP.COM where the XX is the number of 
pages to be saved expressed as Hexadecimal (you have to con- 
vert it from the decimal number reported by DDT). Now you 
can use PIP to copy the other files you need into the current user 
area. You still can't use files in other user areas without first 
copying them into the current area. And if you want to use a file 
(such as D.COM) in all user areas you have to transfer a copy of 
it into every user area, after first putting PIP into every user 
area. This means that with 15 user areas you would have 15 
copies of PIP.COM and 15 copies of D.COM on the disk. It's little 
wonder that few people used the user areas as implemented by 
DRI in CP/M 2.2. A number of utilities have been developed to 
partially alleviate this problem, but few of them approach the 
power of the ZCPR3 system. 

When you boot ZCPR3, the prompt (A0>) tells you which 
drive and user area you are logged on. If you want to change to 
user four on drive B you just enter B4: and a return. ZCPR3 in- 
corporates a PATH routine which will search various drive and 
user areas for a particular file, so if you are in B4 and want to 
use D.COM which is in AO you enter "D" (from now on the 
following return will be assumed) and ZCPR3 will find D.COM 
and run it without making any extra copies ! 

You can enter the command "PATH" to display the current 
searching sequence which AMPRO supplies as : 

(1) Current drive, current user. 

(2) Current drive, user 0. 

(3) Current drive, user 15. 

(4) Drive A, current user. 

(5) Drive A, user 0. 

(6) Drive A, user 15. 

The PATH command can also be used with arguments to change 
the searching sequence, and named directories can be used. 
With named directories you could name A15 as TEXT and then 
call up a directory of all your text files in that directory with the 
command "DIR TEXT:" 

( Continued on page 43 ) 
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BD Software, Inc. , maker of the original 
CP/M-80 C Language Development 
System, knows 

Time is precious 



So the compilation, linkage and execution 
speeds of BDS C are the fastest available, even 
(especially! ) on floppy-based systems Just ask 
any user! With 15.000+ packages sold since 
1979, there are lots of users . 

New! Ed Ream's RED text editor has been 
integrated into the package, making BOS C a 
truly complete, self-contained C development 
system. 

Powerful original features: CDB symbolic 
source-level debugger, fully customizable 
library and run-time package (for convenient 
ROM-ing of code), XMODEM-compatible 
telecommunications package, and other sample 
applications. 

National C User's Group provides direct access 
to the wealth of public-domain software written 
in BDS C, including text editors and formatters, 
BBS's, assemblers, C compilers, games and 
much more. 

Complete package price: $150. 
All soft-sectored disk formats, plus Apple 
CP/M, available off-the-shelf. Shipping: free, by 
UPS, within USA for prepaid orders. Canada: $5. 
Other: $25 VISA. MC, COD, rush orders accepted. 
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BD Software. Inc. 
P Box 2368 
Cambridge MA 02238 
617-576-3828 
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Editor 

(Continued from page 2) 
overruns and revisions can be 
economical and powerful additions for 
our hardware projects. 

For hardware hacking on 
measurement, control, robotics, and 
other I/O intensive projects we need 
hardware designed for these applications 
instead of hardware designed for per- 
sonal or office computing! There used to 
be a lot of activity with the S-lOO system, 
but there is very little done with S-100 
now. The STD bus is very attractive 
because it has been in use for a long time 
and there is a lot of surplus hardware 
available. My other choice would be the 
VMEbus because of the 68XXX robotics 
and control boards being announced 
every day. The problem with VMEbus is 
that the products are new and high 
priced for industrial applications which 
makes them too expensive for my use. 

Do You Want Bus Information? 

I am very interested in what's being of- 
fered for the new buses, including boar- 
ds, programming techniques, operating 
systems, peripherals, etc., but I need to 
know if I'm boring you. I feel that the 
hardware hackers computers of the 
future will come from these developmen- 
ts. The PC bus is not very useful for my 
needs (it wasn't designed for it), S-100 is 
stagnant, and we need something on 
which to concentrate. The SCSI bus has a 
lot of possibilities, but we'll have to see if 
industry uses it for applications in ad- 
dition to interfacing hard disk drives. 
Perhaps the hardware and software 
hackers will have to get the ball rolling 
on this. The question is, "Do you want 
TCJ to publish information on current 
bus developments?" Write and let me 
know what you want (see info on RBBS 
below) , or I may just keep this info in my 
own file. 

The TCJ RBBS is Coming 

We have just received the good news 
that the phone company has added 
multiplexers in order to provide the ad- 
ditional line we need for our RBBS. Now 
we are looking for the equipment (and 
the time) to get a board up and running. 
Tom Hilton is working on the software, 
and I hope to be able to announce the 
board in the next issue. Think about what 
you want on the board in addition to TCJ 
program listings and messages— we 
don't intend to offer all the programs 
which are already on many other boards. 
Ours should be unique and special. ■ 
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The SCSI Interface 

Introduction to SCSI 

By Rick Lehrbaum 



Introduction 

In this part of The Computer Journal's series on the Small 
Computer System Interface (SCSI), we will take an introduc- 
tory look at the features and functions of SCSI, both from a sof- 
tware and hardware perspective. This article will serve as a 
sort of "SCSI Primer." We'll see why and how SCSI is used, 
what it offers to the computer system (and to the user) , and how 
it is structured architecturally. 

The next part (Part 3) of this series will go into greater 
technical detail on the SCSI software and bus interface 
protocols, while Part 4 will include some simple SCSI design 
examples. After we've established the basics in Parts 1 through 
4 of this series, we'll explore some new SCSI developments (in- 
cluding SCSI/PLUS, Super SCSI, and Enhanced SCSI! ), look at 
some specific SCSI products (disk, tape, optical, ...), and 
discuss some unique SCSI applications (scanners, emulators, 



Why SCSI? 

As we saw in Part 1 ( TCJ Issue #22 , page 25) , SCSI grew out of 
the Shugart Associates System Interface ("SASI") as a matter 
of practicality. Shugart was tired of waiting 18 to 24 months for 
sales to ramp up after the introduction of each new disk drive 
technology. So Shugart invented SASI to simplify the addition of 
new mass storage devices to existing systems. SCSI is simply 
standardized SASI. The Shugart Associates System Interface 
became the "Small Computer System Interface" (SCSI) when 
the American National Standards Committee X3T9.2 took on the 
task of standardizing SASI. 

The purpose of SCSI is to create a high level interface to 
peripheral devices, so that system designers have an easier task 
interfacing existing systems to new peripheral devices. This is 
accomplished in two ways : 

(1) The hardware interface is reduced to a simple bi- 
directional data path with a few simple handshake and control 
signals. The result is a "buffered" bus which is independent of 
both the computer and the peripheral device to which it is con- 
nected—a sort of common meeting ground for the system and 
the peripheral. 

( 2 ) The software interface is generalized so that a common set 
of software commands can be used to control peripheral devices 
within a given device class (e.g. random access devices) in- 
dependent of their specific features and design. 

Ideally, this isolates the host computer from the specific 
details of the peripheral device. When properly implemented, 
SCSI allows a variety of devices to be interchangeably connec- 
ted to a computer system, with no change to system software or 
hardware interfaces. For example, two SCSI hard disk sub- 
systems might appear identical to the host computer with the 
exception of the number of megabytes of data they can store, 
even though the subsystems may contain entirely different 
drive technologies. In fact, one company will soon introduce an 
SCSI tape drive that looks like a hard disk drive to the host's sof- 
tware. 

SCSI therefore offers the possibility of true "plug-and-play" 
system integration. The computer system has an SCSI "socket" 
and a set of software SCSI device drivers and formatters. SCSI 
even provides commands which allow the host computer to ask 



connected devices what they are and how big they are. Con- 
sequently, peripheral device drivers and formatters can be 
written to automatically configure themselves to the charac- 
teristics of the SCSI devices. For example, a host computer 
might automatically determine what devices are attached to its 
SCSI bus on powerup, when the system initially "boots,'' and 
configure itself accordingly. 

Unfortunately, the plug-and-play promise of SCSI has not yet 
been fully realized. At this time, system software generally can 
only deal with a few specific SCSI makes/models, and must 
either be told by a system installer, or must perform some sort 
of test to determine, what make and model of SCSI device is 
connected. 

There is, however, no fundamental obstacle to plug-and-play 
SCSI. In fact, two recent events have contributed to an upsurge 
in SCSI product compatibility: (1) The ANSC X3T9.2 committee 
has forwarded the final draft SCSI document for public release 
and final publication; and (2) SCSI product vendors have begun 
to cooperatively agree on "common command sets" which 
create an enhanced level of software uniformity relative to that 
required by the SCSI specification. We'll cover the first of the 
common command sets, the Common Command Set for Ran- 
dom Access Devices (e.g. hard disk), in a future article in this 
series. 

An SCSI Architecture Overview 

Before we begin on our exploration of SCSI, let's define a few 
terms. 

SCSI was intended to provide an "intelligent" interface bet- 
ween computers and peripheral devices. In many ways, SCSI is 
like a network. Up to 8 intelligent devices can share a single SC- 
SI bus. Any SCSI device on the SCSI bus can communicate with 
any other device on the bus. This is termed a "peer-to-peer' ' ar- 
chitecture. 

There are three typical configurations of SCSI. Some im- 
plementations involve a single computer and a single peripheral 
device. Others have one computer and multiple peripherals. 
Still others envolve multiple computers sharing multiple 
peripherals. 

In SCSI lingo, the computer is officially called an "Initiator" 
and the peripheral device is called a "Target." The three SCSI 
configurations, shown in Figure 1, are: 

Single Initiator, Single Target 
Single Initiator, Multiple Target 
Multiple Initiator, Multiple Target 

We'll learn more about the differences in these three con- 
figurations in the next part of this series. Most systems fall into 
the Single Initiator, Single Target category, which might be 
thought of as "simple SCSI." 

Breaking up the Controller 

What SCSI has done is to "break" up the traditional system in- 
to a new set of partitions. (See Figure 2.) 

Traditionally, the host computer is usually connected to 
peripheral devices through a custom device-specific controller. 
As an example of the traditional system partitioning, consider 
the typical hard disk drive controller used to interface an S100 
system to an ST506/412 type hard disk drive. It contains a 
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Figure 1: SCSI Configurations. 



serializer/de-serializer, a data separator, error correction 
logic, buffer logic, a system bus interface, and drive interface 
logic. On the software side, unless the controller card has its 
own on-board microprocessor, the host system software must 
oversee every aspect of the controller, including drive control, 
data control, error recovery, buffer management, formatting, 
etc. 

In an SCSI-based system, the device controller function is 
divided into two parts One part takes care of the actual physical 
device (in this example, the hard disk drive). This part is called 
the SCSI formatter/controller. The other part interfaces the 
host computer to the SCSI bus, which is how the two parts of this 
"broken up" controller communicate with each other. This 
second part is called the Host Adapter, and is often a single IC in 
microprocessor based host computers. A single Host Adapter 
can control up to seven SCSI controllers (which can each control 
many peripheral devices) . 

The Importance of Intelligence 

SCSI not only breaks the traditional controller hardware up 
into two parts, but also divides up the software. To do this, each 
SCSI device controller has its own local intelligence. 

The SCSI controller uses an on-board microprocessor to con- 
trol the SCSI interface. In addition, the SCSI controller's on- 



board microprocessor contains the firmware required to control 
and format the peripheral device. For example, the controller's 
firmware would include such SCSI commands as Format Unit, 
Read Data, Write Data, Test Unit Ready, etc. 

Since the detailed device interface and control algorithms are 
provided in "canned" routines, accessed through SCSI's high 
level commands, the expertise and responsibility for the low 
level device interface rests with the controller manufacturer, 
rather than with the system's designers and programmers. The 
system need only properly handle the high level SCSI comman- 
ds, which are quite similar to operating system functions. 

The Results 

The peripheral control firmware that resides on the controller 
provides a tremendous savings in system software design time, 
expense, and headaches. New or added types of disk drives or 
other peripheral devices can often be added to a SCSI-based 
computer system in days rather than months. Less obvious, 
but equally important, is an important side benefit: a substan- 
tial improvement in both reliability and functionality. After all, 
the controller manufacturer is an expert in the peripheral 
technology for which the controller is designed. 

The SCSI controller's on-board microprocessor provides a 
degree of parallel processing which saves the host computer the 
burden of low level peripheral control and maintenance. In 
many systems the performance available with SCSI controllers 
is two to five times that available with traditional device- 
specific controllers. 

SCSI Bus Signals 

The SCSI physical bus interface is fairly straight forward. 
Although we won't be dealing with bus interface details until the 
next part in this SCSI series, let's look very briefly at the bus 
signal functions: 

DB0-DB7— Eight bi-directional data lines. It is over these lines 
that the data is transferred between the Initiator and the Target, 
in either direction. These lines are also used as device selects 
during the initial selection of a Target by an Initiator. 

DBP— Data bus parity. This is an option, and often not used. 

BSY— Busy. Indicates bus is in use. This signal is initially ac- 
tivated by an Initiator to gain control of the bus, but later asser- 
ted by a Target to indicate that it is active on the bus. 

SEL— Select. Used by one device to establish communication 
with another. Controlled by the Initiator. 

C/D— Control/Data. Indicates type of information on data 
lines. Controlled by the Target. 

I/O— Input/Output. Indicates direction of data transfer bet- 
ween devices. From Initiator to Target is called "Output." Con- 
trolled by the Target. 

MSG — Message. Indicates that the Target desires to send a 
message to the Initiator while the Target is selected. Controlled 
by the Target. 

REQ— Request. This signal is driven by a Target, once selec- 
ted by an Initiator, to indicate that it is ready for a byte of data 
on the data lines. 

ACK— Acknowledge. This signal is driven by an Initiator in 
response to a REQ signal from a Target, once the required data 
has been placed on, or read from, the data lines. 

ATN— Attention. This signal is used by an Initiator to indicate 
a special condition or status to a selected Target. 

RST— Reset. Used by an SCSI device to reset all bus devices. 

These signals can either be driven with single-ended or dif- 
ferential line drivers, depending on whether the system chooses 
to implement SCSI's Single-Ended or Differential Option. We'll 
look at the differences between these two interface options, as 
well as the signal timing relationships, next time. 
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Figure 2: I/O Alternatives. 
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Adding A SCSI Bus 

If you have a bus-based system, you should have no trouble 
locating an SCSI interface adapter (often called a "Host Adap- 
ter") for your system. Host Adapters are available for nearly all 
bus-based systems, including IBM PC's, XT's, and AT's, and the 
Apple II, Multibus, VME bus, S100 bus, Q-bus, etc. The new Ap- 
ple Macintosh PLUS even comes with a standard built-in SCSI 
port! 

If you are planning to design your own SCSI interface, the 
complexity of hardware and software you will require depends 
on which SCSI configuration you need to use. 

For the single Initiator configuration ("simple SCSI"), SCSI 
bus signal timing is relatively non-critical, and can be com- 
pletely controlled by software. In this case, all that is needed are 
bidirectional digital I/O lines with high current output drivers. 
In addition, DMA logic is recommended, though not required. 

To take full advantage of the peer-to-peer aspects of SCSI 
(multiple Initiator, Disconnect/Reconnect, etc.), special cir- 
cuitry must be used to implement such time-critical functions as 
SCSI bus arbitration. However, now that single-chip SCSI inter- 
face IC's are inexpensively available from several sources, a 
fully implemented SCSI interface is easily achieved. 



Single-chip SCSI interface controllers are now available from 
NCR, OMTI, Western Digital, Fujitsu, and others. These 
provide the entire SCSI bus interface— including the bus drivers 
and receivers— in a single IC package. 

Making the Bus Run 

Once the SCSI bus is in place, SCSI drivers and utilities must 
be used to format and operate the desired SCSI devices. If you 
use a ready made SCSI host adapter, those software items are 
usually provided by the host adapter manufacturer. In this case 
the only problem is getting the drivers and utilities for the right 
operating system, and for the desired manufacturer's SCSI con- 
troller or device. 

If you are creating a custom SCSI interface or host adapter, 
you will have to generate your own SCSI format and operating 
software. If this is the case, you'll appreciate the technical 
details to appear in the next part of this SCSI Interface 
Series. ■ 
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NEW-DOS 

Part 2: The Console Command Processor, Continued 

By C. Thomas Hilton 



WelJ gang. I hate to do it to you, but I have had to make some 
changes in the source code for this series. Time, Tide, And 
Technology waits for no one, as they say. I have upgraded my 
system to the new AMPRO* IB CPU, and AMPRO has changed 
their BIOS several times since I acquired my system. Ad- 
ditionally, I have been doing a lot of work on the BIOS for my 
AVS Voice Computing System for the visually impaired. It is 
just too hard for me to switch back and forth between systems. I 
would have liked to have screamed, "Stop The Presses," but the 
changes required are insignificant. Those of you who ordered 
the support disk for this series will have received the new ver- 
sion of the code, so there is nothing to be concerned about. 
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Figure l : Dual System Memory Map. 



Taking a look at our revised memory map you will see where 
everything is, and there are options you may install to either 
leave things as they were, or upgrade your code to the current 
version. There will be no differences in the discussion of the code 
from version to version. 

I have also enlarged the stack by three calls, or 6 bytes, to 32 
bytes. Change any source listing showing a 26 byte stack to 32 
bytes. This extra space is used only in complex CCP command 
functions. 

Moving On... 

Listing One shows the code segments we have already 
discussed, and as the code stands at this moment. Be sure that 
you have selected the proper equate for the memory size and 
BIOS you are using! Please refer to PART ONE of this series for 
a detailed discussion of what this code is doing, and why. 

This "code base" forms the primary CCP loop. In this 
segment we will discuss the subroutines which are called by this 
code base. At this point refer to Listing 2. We will begin our 



discussion with the first subroutine called, beginning at the top 
of our source code, in Listing 1. The first subroutine call is made 
after entry at CCP. 

To refresh our memories, and having entered at CCP, we ex- 
pect an Autocommand to be executed. Our first chore is to 
establish a local stack for use by the CCP. The BIOS has sent us 
the system drive designator in register "C." Our first concern, 
after defining a local stack, is to save this system drive infor- 
mation on the stack. 
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We then extract the user area, or subdirectory information : 



LD 

RRA 

R«A 

RftA 

RRA 

AND 

LD 

CALL 



Ic-uMr/dtak niMto 
[•"tract Ktmmr nuab 



E.A 

SETUSR 



and load that information, the user area, into register "E." 
Register "E" is used as we are about to make a BDOS 
subroutine call, and this information will be the parameter in- 
formation passed to the DOS system. Looking at Listing 2 we see 
that SETUSR is but a small portion of another set of subroutines 
sharing the same segment of code. We are limited by the 
amount of space the CCP may occupy. Whenever there is a 
chance to save a little code, we must do so! Redundant code is 
something a good programmer tries to avoid. By "packing" 
your code the program will be smaller, and will run faster, 
though it may be no easier to understand either by yourself, or 
others. 

When the BIOS passes control of the system to the CCP the 
user code and drive designation is in register "C," we have ex- 
tracted the user code, and passed the data to SETUSR. SETUSR 
now calls the DOS system and places this data into the 
drive/user byte at location four, page zero, for use by other por- 
tions of the system. If you find yourself confused about the con- 
cept of user areas, and their storage in page zero, refresh your 
memory by referring to the first installment of this series. 

The section of code that we are now concerned with could have 
been written as: 
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But, again, when we are trying to pack the greatest number of 
features into a small area, every byte counts, and duplicated 
code is wasted code. 

While we are here, and while we are concerning ourselves 
with the setting of user areas, note how the rest of this code 
block is formed. Note also the trick of placing a variable position 
in the space set aside for literal data. Whomever thought up this 
one deserves a pat on the back ! 
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LISTING 1 
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Sourct Cod* F : I « 
(e> 1983, 1986 C. Them Hilton 
Pn mary 

Hardware: Ampro Strni 100, 1A CPU 
(Original Littl> Board) 
Ampro Seriti 100, IB CPU 
(Bios 3.4) 
CP/M 2.2 

( Ampro Standard Vtrilon) 
A True Z-80 RtDl.ct«.nt Console Command Processor To: 

1. Rtitor. AUTOCOMMAND Function To Non-ZCPR3 CP/M 

2. Enhance Standard CP/M Console Functions 
Version Author: C. Thomam Hilton 

Indax : * 
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CROWE Chain File Containing CCP Commands 



System: 



Funct i on : 



CCP.CRW 
CCPA.CRW 



LIST 
TITLE 
NLIST 
I 

NO EQU 
YES EQU 
OLDBIOS EQU 
NEWBIOS EQU 



'CCP Main Loop' 



AMPCCP 
BIOS 



AMPCCP 
BIOS 



IF 

EQU 

EQU 

END IF 

IF 

EQU 

EQU 

END IF 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

ORG 

JP 
JP 

EQU 

BYTE 

BYTE 

DATA 

BYTE 

RSRV 



terminal 


0FFH 
NO 
YES 



OLDBIOS 

0D800H 

0EE00H 

NEWBIOS 

0D400H 

0EA00H 



and 'type' customi rat l on equates 

(conditional logic boolean declarations 

I set to YES if not BIOS 3.4 

I set to YES if BIOS 3.4 but make only one 

lotos definition to YES, the other BI08 option 

I must be set to NO 



leep location for 
1 and version 1 . X 



ampro series 
-2.X BIOS syi 



leep location for 60K Ampro IB CPU 
I location for new Ampro BIOS 3.4 
land my AVS voice BIOS Version 1.0 



(character: 
I character : 
(character: 
Icharacter : 
(character: 



(cp/m M«rm boot address 

luser nun in high nybble, disk 

Ibdos function call entry pt 

(default feb buffer 

I default disk i/o buffer 

I base of tpa 

(ampro cp/m site 



CR 

LF 

TAB 

ESC 

CTRLC 

WBOOT 

UDFLA8 

BDOS 

TFCB 

TBUFF 

TPA 

MSIZE 

CBBUFF 

RCPM 

MINES 

PQDFLG 

MAXUSR 

SYSFLQ 

SOFLO 

DEFUSR 

I 

I 

entry: 
i 

BUFLEN 

mbuff: 
cbuff: 

CI BUFF: 
CIBUF: 

( 

I ccp starting points 

• 

I start ccp and don't process default c 

I 

CCPl: xof* A 

LD (CBUFF), A 

I 
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I set user number 

I reset disk system 

(c-user/dlsk number (see loc 
(extract default disk drive 
I set it 




NGS FORTH 

A FAST FORTH, 
OPTIMIZED FOR THE IBM 
PERSONAL COMPUTER AND 
MS-DOS COMPATIBLES. 



STANDARD FEATURES 
INCLUDE; 

•79 STANDARD 

•DIRECT I/O ACCESS 

•FULL ACCESS TO MS-DOS 
FILES AND FUNCTIONS 

•ENVIRONMENT SAVE 
& LOAD 

•MULTT -SEGMENTED FOR 
LARGE APPLICATIONS 

•EXTENDED ADDRESSING 

•MEMORY ALLOCATION 
CONFIGURABLE ON-LINE 

•AUTO LOAD SCREEN BOOT 

•LINE & SCREEN EDITORS 

•DECOMPILER AND 
DEBUGGING AIDS 

•8088 ASSEMBLER 

•GRAPHICS & SOUND 

•NGS ENHANCEMENTS 

•DETAILED MANUAL 

•INEXPENSIVE UPGRADES 

•NGS USER NEWSLETTER 

A COMPLETE FORTH 
DEVELOPMENT SYSTEM. 

PRICES START AT $70~ 

NEW<»>HP-150 ft EP-110 
VERSIONS AVAILABLE 



US 



NEXT GENERATION SYSTEMS 
P.O.BOX 2987 
SANTA CLARA, CA. 95055 
(408) 241-5909 



FOR TRS-80 MODELS 1,3*4 
IBM PC, XT, AND COMPAQ 

Train Your Computer 
to be an 

EXPERT! 

Expert systems facilitate the reduc- 
tion of human expertise to simple, 
English-style rule-sets, then use them 
to diagnose problems. "Knowledge 
engineers" are developing many 
applications now. 

EXPERT-2, Jack Park's outstanding 
introduction to expert systems, has 
been modified by MMS for MMS- 
FORTH V2.0 and up. We supply it 
with full and well-documented source 
code to permit addition of advanced 
features, a good manual and sample 
rule-sets: stock market analysis, a 
digital fault analyzer, and the Animal 
Game. Plus the benefits of 
MMSFORTH's excellent full-screen 
editor, super-fast compiling, compact 
and high-speed run-time code, many 
built-in utilities and wide choice of 
other application programs. 

( Rule 1 - demo in EXPERT-2 ) 
IF you want EXPERT-2 
ANDNOT you own MMSFORTH 
THENHYP you need to buy 

MMSFORTH plus EXPERT-2 
BECAUSE MMSFORTH la required 

EXPERT-2 

In 




FORTH 



The total software environment for 
IBM PC, TRS-80 Model 1, 3, 4 and 
close friends. 



• Personal License (required): 

MMFOirrH Spkn DMi (IBM PC) .... 
MMSTOKTH Syrian Dtak (TRWO 1 , 3 or 4) 

• Personal License (optional module*) 

rORTHCOM convnunioltoni moduli .... $ 
UTUTKS 



EXPBTT-2 Opel tymrn 

DATAHANDLE* SBJ6 

OATAHAHPU B I H.US (PC orty, 1MK lag.) SMS 

POP) I HWW 1 1 eora proem or 17&00 

• Corporate Site License 
Extensions iram $1,000 

• Some recommended Forth books: 

UMDOSTANOMa FORTH (owntae) . . . $ 2J6 

STAJmNa FORTH (programming) IMS 

THMKMO FORTH (tachniqu.) 1MB 

■t o aaa wo forth (n iuksforth) .... i«js 

Srupping/handkng a ax ami. No returns on software 

Ask your dealer to show you the world of 
MMSFORTH, or request our free brochure. 

MILLER MICROCOMPUTER SERVICES 

61 Lake Shore Road, Natlek, MA 01760 

(617)6534136 



JR 

CALL 

LD 

OR 

JR 

LD 

OR 

JP 

JR 

LD 

LD 

LD 

LDIR 

XOR 

LD 

JP 



Z.NLOB 

LOGIN 

A, (C80UFF) 

A 

N2.CBPROC 

A, (CBUFF) 

A 

NZ.R81 

RE8TRT 

BC,9 

HL.CBBUFF 

DE, CBUFF 



(CBBUFF>,A 
RSI 
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■■kip if 0... already logged 

I log In da-fault disk 

lis there tyttfl* cosuaand to ixtcuti^ 

I if not tiro there is a coaaaand 



I proatpt utir and input coawaai 

I 

RESTRT: LD 

XOR 

LD 
I 

I print prompt <du>> 
I 

CALL 

CALL 

ADD 

CALL 

CALL 

CP 

JR 

SUB 

PUSH 

LD 

CALL 

POP 
RS00: ADD 

CALL 



SP, STACK 

A 

(CBUFF) ,A 



CRLF 

QETDRV 

A, 'A' 

CONOUT 

SETUSR 

10 

C.RS00 

10 

AF 

A,' I' 

CONOUT 

AF 

A, '0' 

CONOUT 



ind 1 ins froa hia 
I reset stack 



Iprint pro«pt 

I current drive Is part of proept 

(convert to ascii a-p 

I get user nuabtr 
I user < 10? 

{subtract 10 froa it 

I save 1 1 

loutput 10*s digit 



(output l's digit (convert to ascll) 



I 

I read input line froat user 

I 

RS000: CALL REDBUF 

I 

I process input line 

RS 1 : CALL CNVBUF 



CALL 


DEFDMA 


CALL 


GETDRV 


LD 


(TDRIVE) ,A 


CALL 


SCANER 


CALL 


NZ, ERROR 


LD 


DE.RSTCCP 


PUSH 


DE 


LD 


A. (TENPDR) 


OR 


A 


JP 


NZ.CQM 


CALL 


CMDSER 


JP 


NZ.COM 


LD 


A, (HL) 


INC 


HL 


LD 


H, (HL) 


LD 


L.A 


JP 


(HL) 



I input cowmnd 1 i ne -fro 



(capitalize command lino, place ending 0, 

I and set ci bptr val ue 

|i>t tbuff to dm* address 

I get def aul t dr i ve number 

(set it 

1 pairs* coMiand nam* from command 1 in* 

Itrror i f command nam* contai ns a ' ?' 

I put return address of c o m m and 

ion the stack 

lis command of form 'd: command* 7 

|n:«v« 

I immedi atel y 

I scan for ccp-resident c o mmand 

|not ccp-resident 

(found it: get low-order part 

I gat high-order part 

■store high 

I store Ion 

I execute ccp routine 



I entry point for restarting ccp and logging in default drive 



I 

rstccp: XOR A 

LD (CBUFF), A 

CALL DLOGIN 
I 

I entry point for restarting ccp without logging in default drive 
I 

rccpnl: call scaner 

ld a. (fcbfn) 

SUB ' ' 

LD HL.TEMPDR 

OR (HL) 

JP NZ, ERROR 

JP RESTRT 



I log in default drive 



I ex tract next token from command 
Iget first char of token 
I any char? 



NOTE! The segments of code above are discussed In Part One of 
this series. Please note the changes to alio*, a £**K 
system using the Ampro BIOS 3.4. 

The code which follows is discussed in Part Two of this 
series. 
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The equate TMPUSR is set to the current program counter 
value, plus one. Since the current position, once assembled is the 
load instruction, "LD," TMPUSR is pointing to the position oc- 
cupied by the "0." Any byte that is loaded into TMPUSR will be 
loaded into the "A" register in the place of the default zero 
value. Such a sequence would appear as: 

LD (TMPUSR), A 
where we will say that "A" has the value of 15. This would be the 
same as saying, when RESETUSR was encountered, 



RESETUSfl: 
TMPUSR EQU 



tpaintar tor 
12nd byta liMcdl 
Iplaca in ■ 
I than go aat uaar 



n-tha-eoda Modification 
adlata arg> la tapuar 



After having defined the user area we wish the system to place 
in location four, we then jump down to SETUSR. 



LISTING 


3 








1 

1 bdoa 

1 


funct 


ton routinaa 






1 

( raturn number o4 currant 


diafc 


in a 


9ETDRV: 


LO 

JR 


C.J9H 
BDOSJP 






1 mat B0h as 


data addraaa 






DEFDMA: 


LD 


DE.TBUFF 




I8«h-tbuf * 


DMA8ET: 


LD 
JR 


C, lArl 
BDOSJP 






RESET: 


LD 


C.0DH 






bdosjp: 


JP 


BDOS 






login: 


LD 
LD 


E.A 
C.0EH 








JR 


BDOSJP 




laava scxm coda apaca 



Other portions of the program, in our main loop, such as the 
code portion noted below, also use the GETUSR routine. 



1 print 


proaot 


(du>> 




' 


CALL 


CRLF 


[print proapt 




CALL 


SETDRV 


Icurrant driva la part o* 




ADO 


A, - A' 


leonvart to aacl 1 a-p 




CALL 


CONOUT 




> 


CALL 


GETUSR 


Igat uht noafear 



In this example we need to know what the current user area is 
so that we can display it in the "AX> " prompt, where "X" is the 
current user area. 

DOS function SDH, used when we jump to SETUSR to load the 
"C" register with 20H, is one of CP/M's dual mode function 
calls. If we put FFH in register "E" the current user number 
will be returned in the "A" register. If a value other than FF is 
placed in the "E" register, that value will be set, by BDOS, as 
the current user area. FFH serves as a "flag" to determine 
which function, set the user code, or return the user code, the 
DOS routine is to perform. 



SETUSR: 
SETUSR: 



E,»FFH 

C2SH 

BDOSJP 



Igat currant u 
I aat /or gat ua 



After any of the above conditions we do a jump to a common 
BDOS handling routine. The symbol BDOS has been defined to 
represent location five, in page zero. This actual code is shown 
at the bottom of listing 3, as : 
BDOSJP: JP BDOS 

Moving down our primary source loop to the next subroutine 
call, we find that RESET is our next victim. 

Having changed the user area code, we now have to be sure 



that everyone is aware of the fact, as all portions of the system 
must work together, if the system is to work properly. 



RESET: LD 
BDOSJP: JP 



C.flDH 
BOOS 



The RESET function, DOS function 13, restores the file 
system, and directory, to a read/write condition, selects drive 
"A" as the system disk, and redefines low memory variables. 
The default DMA buffer, used for all disk input and output, is 
reset to 0080H. 

You may note that we have been concerned only with user 
areas to this point, not the drive designator which occupies the 
lower four bits of the drive/user byte. With this call we set the 
system to its default state, a fresh start, but with the BIOS 
defined user area. At this time I should note that CP/M doesn't 
really care about user areas, it only "tolerates" this byte. 
Therefore, everything we want to do, which concerns user 
areas, we must do ourselves, if we want it done right. 

Following our primary CCP loop, to the next subroutine call 
we see that the next thing we do is get back the disk/user 
specification byte sent to us by BIOS, which we "pushed" onto 
the stack. At this time we are "logged into" disk drive "A" and 
the user area given to us upon entry to the CCP. 



POP 


BC 




LD 


A.C 


Ic^uaar/diak nuaoar [mm toe 4) 


AND 


SFH 


laxtract datault dlafc drlva 


LD 


(TDRIVE) ,A 


laat it 


JR 


Z.NL08 


laklp 1* a...alraady loqoad 


CALL 


LOSIN 


(log In da«ault dlaa 


LD 


A, tCBSUFF! 


Ma thara ayataaj coaamd to a«ac 



Disk designators are not defined by letters, but by numbers. 
The letter designation is something purely for human consum- 
ption, whose reason is unknown to me. Perhaps I am not smart 
enough to use numbers, I don't know, (sigh). Figure 2 shows the 
internal designation table for disk drives. 



00H - DAIVE A 


0OH - DRIVE I 






01H - DRIVE B 


•W - DRIVE J 






02H - DRIVE C 


0AH - DRIVE K 






03H - DRIVE D 


0BH - DRIVE L 






04H - DRIVE E 


9CH - DRIVE n 






»3M - DRIVE F 


•DH - DRIVE N 






06H - DRIVE G 


•EH - DRIVE 






07M - DRIVE M 


«FH - DRIVE P 






MOTE: Th» upptvr 


four bits, rtprntnttd by * 


■*- i 


n tht> tbovt 


'iqurt is Mhmrm thtt 


uiir *rm* cod* is stored. 

Figure 2 







In any event, we get the byte back off the stack, and perform s 
logical AND upon it. I am assuming that you know how a logica 
AND works. Since the upper nybble of the operator is a zerc 
value, in hex, the user code is stripped off, not included in the 
resulting value. The "F" value, or 16 decimal, is large enough tc 
permit the total number of disk drive designators in Figure 2 to 
pass through this boolean function. 

When this logical operation is performed against the 
drive/ user byte certain Z-80 flags are set. If the disk drive num- 
ber is other than a zero value the zero flag will not be set. While 
the flag will be set at the time the operation is performed, we do 
not want to act upon it at this time. 

Before we act upon the logical AND, we want to store the 
default drive value for later, internal use. We do not want to 
bother BDOS any more than we have to. It resets more values 
than we want changed. We therefore store this value in a tem- 
porary drive register, which is no more than*a memory location 
set aside for the purpose. This is how variables are handled in 
machine language. 

If the value of the drive sent us was a zero value, which Figure 
2 tells us is the normal "A" drive, we do not have to log in a new 
drive. In this case we jump over the call to LOGIN. 



14 



In the event that the BIOS has specified that we begin, and 
always return to, a drive other than drive "A" then the "Z" flag 
will not be set, indicating a nonzero result of the logical AND 
function. If this is the case we must then assign the specified 
disk drive. 



JR BDOSJP l»*v» momm cod* iptct 

The log in function is accomplished by loading the value left in 
the "A" register, from the AND function, into the "E" register, 
and calling BDOS function 14. 

BDOS function 14 is the "SELECT DRIVE" function. When 
this function is called, the selected disk drive, represented by 
the number in register "E," is placed in an "active" mode. The 
current directory information is discarded, and the new direc- 
tory information from the specified drive is loaded into 
memory. As we have already defined the user area, the direc- 
tory information acted upon by various programs will return 
only those programs whose directory code represents the 
current user area. 

We have placed the system on-line as per our instructions 
from the BIOS. Having done all of this we now check to see if 
there is an Autocommand function to be executed. As might be 
inferred, (I heard that guy in the back!), yes, it is possible to 
boot to a drive other than drive "A." All that is required is to 
place the desired disk and user area into register "C," and jump 
into the CCP! It's not my fault no one told you this before! ! The 
system must know where to get the DOS and CCP from the disk, 
but once loaded no one really cares all that much. 

Several of the other subroutine calls in the main loop also 
make BDOS calls, which are also shown in Listing 3. These are 
relatively simple functions, which I will allow you, the reader, to 
explore by yourself. At this sitting we have a great deal more to 
discuss, of higher priority, so we must move along quickly. 



LISTING 


4 






1 

1 outpu 


t ch»r 


in rmq a to consols and don't chang* be 


1 output <crlf> 




CRLF: 


LD 




A,CR 




CALL 




CONOUT 




LD 




A.LF Mall thru to conout 


CONOUT: 


PUSH 




BC 




LD 




C.02H 


OUTPUT: 


LD 




E,A 




PUSH 




HL 




CALL 




BDOS 




POP 




HL 




POP 




BC 




RET 







Listing 4 presents the basic character output routines called 
by the section of the main loop concerned with printing the 
prompt, at segment: 



I print prompt (du >) 

I 

CALL CRLF 

CALL QETDRV 

ADD A, ' A' 

CALL CONOUT 

CALL GCTUSR 



Iprint prompt 
ieurrt»nt dri 
iconvtrt to 



• i • part of prompt 



u«*rr riumbmr 



The first thing we want to do is clear a fresh line to print the 
"A0> " prompt upon. CRLF does this for us, using CONOUT, the 
generic "print a character" subroutine. BASIC programmers 
should note that the expected carriage return/line feed sequen- 
ce is not automatic at the assembler, or machine language level. 
No one at this level of the system is going to take the blame for 
printing any character it isn't supposed to. The ruling concept is 
to expect nothing, take nothing for granted, and specifically 
define exactly what must be printed. "If you don't, it won't." 



ITM 



$949 



Little Board ♦♦♦♦ 

Th« World's Least Expensive CP/M Engine 

CP/M 2.2 

INCLUDED 




• 4 MHZ Z80A CPU, 64K RAM, Z80A 
CTC, 4-32K EPROM 

• Mini/Micro Floppy Controller 
(1-4 Drives, Sin3le/Doubl« Density, 
1-2 sided 40/80 track) 

• 2 RS232C Serial Ports (75-9600 baud 
4 75-38, 400 baud), 1 Centronics 
Printer Port 

• Power Requirement: »5VTX at 75A, 
»12VDCat.05A/Onboard -12V 
converter 

• Only 5 75 x 7.75 inches, mounts 
directly to a 5-1 / 4' disk dnve 

• Comprehensive Software Included 
• Enhanced CP/M 2.2 operating 



system with ZCPR3 

• Read/write/format dozens of 
floppy formats (IBM PC-DOS, 
KAYPRO, OSBORNE, MORROW ) 

• Menu-based system customization 

• Operator-friendly MENU shell 
> OPTIONS 

• Source Code 

• TurboDOS 

• ZRDOS 

• Hard disk expansion to 60 
megabytes 

• SCSI/PLUS " multi-master I/O 
expansion bus 

• Local Area Network 

• STD Bus Adapter 



TM 



BOOKSHELF 

Fast, Compact, Hfeii Quality, lasy-to-usc CP/M System 



Jat/tfj 700 




Priced from 

$895.00 

10MB System 

Only $1645.00 



• Ready-to-use professional CP/M 
computer system 

• Works with any RS232C ASCII 
terminal (not included) 

• Network available 

• Compact 7 3 x 6 5 x 10 5 inches, 
12.5 pounds, alt-metal construction 

• Powerful and Versatile: 

• Based on uttle Board 
single-board computer 

• One or two 400 or 800 KB floppy 
drives 

• 1 0-MB internal hard disk drive 
option 



AJKUXTIHA: FACTORIAL $A :1: 41-0018 
ILX 22408 •QOIUM: CENTO 
ELECTRONKXIE LEMPEREUR (041 23-4541 
TLX 42621 CANADA; DYNACOmP 
COMPUTE* SYSTEMS LTD , 604' 872-7737 
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HL»NCI:EGAi.-, (II 502-1800 TLX 620803 
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• Comprehensive Software Included 

• Enhanced CP/M operating system 
with ZCPR3 

• Word processing, spreadsheet, 
relational database, spelling 
checker, and data encrypt/ 
decrypt (T/MAXERIII -) 

• Operator-fnendty shells Menu, 
Friendly" 

• Read/write and format dozens of 
floppy formats (IBM PC-DOS, 
KAYPRO, OSBORNE, MORROW 1 

• Menu-oased system customization 



MICROCOMPUTERS, :613' 50CW628 
MAX*. CMC DATA LEADER LTDA 
(«V 262-2262. TLX 04 1 -6364 G 
DANBIT. ;03 1 66-20-20 TLX 43558 
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TLX 121394 tSJUfl: ALPHA TERMINALS. 
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ABAKTA ,08: 54-20-90. TLX 13702 ISA 
CONTACT AMPRO COMPUTERS INC 
TEL ,415) 969-0230 TEULx 4940302 

IBM- IfiMCCT Z80A- Zilos «K CP M- 
Digit* Rescsrcn ZCPR3 - & ZRDOS ' 
Ecncion tnc lurDO DOS • Sotware 200C 
mc T MAXER n: - " Mflxer Co 



~CDVI=L T EnS ' f 

^»» 67 East Evelyn Ave 



iC3CPGSi T EC 
Mountain View CA 94041 . 



.'4151969-0230. TELEX 404T1VI0 
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output char 


n req a 


output ■ cr 1 * 




LF: LD 


A,CR 


CALL 


conout 


LD 


A.LF 



conioli and don't Chang* be 



lf«ll thru 



To present the "cursor back to start, and scroll a line," fun- 
ction we first load a RETURN into the "A" register and call 
CONOUT as a subroutine. We then reload the "A" register with 
a line feed, (CR and LF equates at head of Listing 1), and "fall 
through" to CONOUT, returning to the caller from CONOUT. 



CONOUT: 


PUSH 


BC 




LD 


C,«2H 


OUTPUT: 


LD 


E,A 




PUSH 


HL 




CALL 


BOOS 




POP 


HL 




POP 


BC 




RET 





The operation of CONOUT actually requires very little ex- 
planation. I would make note of the fact that all user registers 
not actually used by the current routines are saved upon the 
stack. This is done because most DOS systems, who in turn call 
the BIOS, do not take the time to save the users registers. They 
do not return them to the caller with the same values they had 
before the call. I have said it a thousand times, and I will repeat 
it here, "SAVE THOSE REGISTERS!!" In doing so you will 
save yourself a great deal of grief. 

Moving right along, locate the following section of code from 
our main source loop: 



) read input 1 t ne *rom 

I 

RSM0: CALL REDBUF 

I 

I process i nput line 

I 

RSi: CALL CNVBUF 



input ccuMand lint from user 



Icapitalize coiwand tln«, piece ending 



At this point we are ready to input a command from the 
operator. Make note that we have printed the disk drive 
designator, "A," and the user area, "0," which forms the 
familiar "A0> " prompt. Note also that we have not yet printed 
the "> " character. We shall print the remaining portion of the 
CCP prompt as we prepare to get input from the console. 

See Listing 5. 



REDBU 
RBI : 


f: 






CALL 


SETUD 




LD 


A, ' >' 




CALL 


CONOUT 




LD 


C.0AH 




LD 


D€. MBUFF 




CALL 


BDOS 



I sat user and di ak 

(read command tin* fro* uaar 
land fall through to SETLWD 



The first thing we want to do is save the drive and user data, 
as it stands at this moment, before any command is accepted or 
acted upon. These functions are performed by SETUD. 



I sat user/disk flag to currant us 



and default dish 



CALL 


3ETUSR 


ADO 


A, A 


AOD 


A, A 


ADD 


A, A 


ADD 


A, A 


LD 


HL.TDRIVE 


00 


(HL> 


LD 


IUDFLAO) ,A 



Iqat nuabar o« currant umt 
Iplaca it in high nybbla 



laaak in oatault driva nuaoar (low nyobla) 

laaak in 

I sat uaar/dlak nuaoar 



Once these functions of saving the current drive and user 
area, internally, are performed we are ready to input our com- 
mand line from the operator. We print the "> " character via 
CONOUT, and then set up the system to do a BDOS Function 10 
call. DOS call 10 is the "read a line of text" function. This call 
requires that we define the maximum number of characters 
allowed in the input line, and where this line of text is to be 
placed. It has to go somewhere! The parameters for this fun- 
ction are defined at the top of our source program. This "buf- 
fer," or place to put the console command is located at CCP+6. 
For a full discussion of this location please refer to PART ONE 
of this series. Again, the set up for input of a command line is : 



C. 0AH 
DC , nBUFF 
BDOS 



lf««d roMind I i na « rM uaar 
l and +«il through to SETU«D 



Note below, that MBUFF contains the maximum number of 
characters the command line may receive. MBUFF + l, or 
CBUFF will, upon return of the DOS function, contain the num- 
ber of actual characters in the command line. DOS function 10 
will return only when a carriage return is input, to signify the 
end of the input string, or when the maximum number of 
characters defined in MBUFF has been reached. 



BUFLEN 
MBUFF: 
CBUFF: 
CI BUFF: 
C I BUF : 



EOU 
BtTE 



BUFLEN- (t-CIBUFF 



MaiKja bu*ftc lanqth 

mauiaua buffer 1 anqth 

numbar of vjiid chin in -cxiunjn 

default (cold boot' ccMvid 

CMainfl itrinq tarminator 

-1 Itotal la buflan' bvta« 



The remainder of this code defines, for the assembler, the 
space to be reserved for this buffer, and its terminating null, or 
zero value character. 

When the input command line has been placed in the com- 
mand buffer, CBUFF, the code then drops into SETUOD, which 
sets an internal register. 



ION«r otriat 



default di 



uaar /disk * I aq to uiw 



5E rutfD: 










r DR [ VE 


EOU 


• ♦ 1 




Ipointtr for in-th«-codS «odl * t cat l on 




LD 


a, a 




I 2nd Oyte ( i Midi iti arq) is tdrive 




LD 


(UDFLAG) 


.A 


1 sat ueer/disk nuabtr 



Having received the input command line, and taken care of a 
little housekeeping, we now must concern ourselves with trying 
to make sense of the data sent to us by the operator. This is not 
always an easy task. Our first task is to convert the data into a 
generic, universal format. In this system all terminal input is 
converted to uppercase characters by CNVBUF. 



( process 



put 1 mi 
CALL CNVBUF 



icapitalize coaW«nd lint, placa endinq 



In addition to converting the command string into all upper 
case characters, CNVBUF assures that there is a terminating 
null at the end of the command. This terminator is just one more 
way to tell when we have reached the end of the human's 
demands of us. The computer does not understand human 
speech. We must find a way to simulate understanding. The 
conversion to upper case is the first step in this process. 



capitalize string (andinq 



cbu+t and sat ptr tar parsing 



CNVBUF: LD 



INC 
INC 



HL, CBUFF 
8, (HL) 



A, (HL) 
UCASE 
(HL) , A 
CB1 

<HL) ,0 
HL , C ! BUFF 
(CIBPTR) ,HL 



Ipt to uitr'i 

ichar count m b 

I add 1 in cim o# tiro 

tpt to 1st valid char 

•capitalize coeaand char 



■ continue to and o+ c pea. and line 

I store ending <null> 

I set c o — and lina ptr to 1st che 



The conversion process begins by setting a 16 bit register to 
point to the beginning of the command character string. 
Remember that CBUFF, upon return from DOS function 10, 
contains the actual number of characters returned in the com- 
mand line. We set this value in register "B" so that we can use a 
powerful command of the Z-80 command set, Decrement and 
Jump Not Zero, or DJNZ. This command is unique to the Z-80, 
which is why sane people do not use an 8060 assembler on a 
machine using a Z-80 processor, though some people do try . . . 

Having set the number of characters in "B" and having ad- 
vanced the "HL" register, serving as our "pointer," to point to 
the first valid character in the command line, we now load the 
"A" register with that character. With the command character 
in "A" we may now call UPCASE, who converts the character, 
if required, into uppercase format. 
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LISTING S 


1 

I input next 

1 

redbuf: 


c 


oeeand to ccp 










rbi: 








CALL 




SETUD 


feet user and disk 


LD 




A, •>' 




CALL 




CONOUT 




LD 




C.0AH 


(read coaaand line froa ueer 


LD 




DE.HBUFF 




CALL 




BDOS 


land fall through to BETU0D 


t set current 


d 


nk nuaber in 


lower paraais set user /disk flag to user 


land default 


d 


Ilk 




SETU0D: 








TDRIVE EQU 




• ♦1 


Ipolnter for in-the-code Modification 


LD 




A,0 


12nd byte (iaaediate arg) is tdrive 


LD 




(UDFLAG) ,A 


leet user /disk nuabar 


RET 








f 

1 set user /disk flag to curr 


•nt user and default disk 


1 

SETUD: CALL 




8ETUSR 


tget nuabar of current user 


ADD 




A, A 


1 pi ace it in high nyoble 


ADO 




A, A 




ADD 




A, A 




ADD 




A, A 




LD 




HL.TDRIVE 


laask in default drive nuabar (low nybble) 


OR 




<HL> 


IMask in 


LD 




< UDFLAG) ,A 


Iset user /disk nuabar 


RET 
1 








1 

1 capitalize 


string (ending 


in 0) in cbuff and set ptr for parsing 


1 

cnvbuf: LD 




HL.CBUFF 


Ipt to user's coaaand 


LD 




B, <HL) 


Ichar count in b 


INC 




B 


ladd 1 In case of zero 


CBl: INC 




HL 


Ipt to 1st valid char 


LD 




A, <HL> 


•capitalize coaaand char 


CALL 




UCASE 




LD 




(HL) ,A 




DJNZ 




CBl 


1 continue to end of coeaand line 


CB2: LD 




(HL>,0 


1 store ending <nul 1 > 


LD 




HL.CIBUFF 


Iset coaaand line ptr to 1st char 


LD 




(CIBPTR).HL 




RET 








1 convert char 


in a to upper 


case 


UCASE: CP 




61H 


1 lower -case a 


RET 




C 




CP 




7BH 


1 greater than lower-case z? 


RET 




NC 




AND 




5FH 


(capital ize 


RET 









I convtft char in 



RET 
AND 
RET 



a to upper ca 



1 leas 


than 1 onir- 


case a? 


lytt, 


•o 


leave/ It 


alone 


1 greater 


than ten. 


ler-case z 


lytt. 


bo 


ignore i 


t •• well 


leap i t 


■ lllf 





LD 


(HLi.a 


LD 


ML.CIBUFF 


LD 


CCIBFTRI.HL 



ending < 
CMMaand 1 : 



ne ptr to lfjt char 



I will leave the process of the actual conversion to upper case 
routine to you, the reader, to explore. Get out your ASCII code 
chart, and keep in mind the actual hex code value of all lower 
case characters, and the function of the logical AND. 

We now repeat the incrementing of the pointer, converting of 
characters to upper case, and the decrementing of the character 
count until the character counter reaches a zero value. This loop 
has been brought to you by the good folks who gave us DJNZ, the 
programmer's friend! 

When the "B" register zeros out we fall through into CB2, who 
places the ending null character at the end of the string as noted 
by the, "number of characters in the line" indicator, not the 
number of characters that could have been in the line. In this 
way we do not try to interpret random trash that may fill a 
command line with less than 80 characters. Yes, I know other 
CCP programs allow longer command lines. I thought 
meaningful error messages were more important. The normal 
CP/M SUBMIT function is not implemented in my CCP. Why? 
Because I never use it. I prefer EX14.COM or other submit type 
programs that do not erase the submit file when they are 
finished. 



Now we have everything set into a universal format, and are 
ready to try and figure out what those upper case characters 
mean ! But, before we can get to the ' 'good' ' stuff we have set the 
DMA address to be used in any upcoming function : 



( 

defdma: 

DHASET: 


LD 
LD 
JR 


DE.TBUFF 
C, 1AH 
BDOSJP 



Even though RESET has set the default DMA buffer for all 
disk in/out to 0080H, do you REALLY trust BDOS? I don't, and 
something may have changed if we have executed an internal 
CCP command. Since I will never take anything for granted, nor 
assume a thing, let's reset the DMA buffer, OK? Call me 
paranoid if you want ! I don't care ! 

The next thing we have to do is store everything we have done 
thus far, because it is almost certain that we will be leaving the 
CCP for awhile, real soon. 



OCTDRV 
(TDRIVE) ,A 



I gat d»«*ult dri 
l»at i t 



• numbw 



From this point we check to see if the user has input a com- 
mand to only change a drive, or wants to get a file from another 
disk drive. 
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A Little Homework 

TCJ is a bimonthly magazine. I am taking far too long in 
discussing code that we will be using over and over again. There 
are other, important, functions I want to cover in this issue. If 
you have been following me thus far you are ready to strike out 
and do some work on your own. Of all the segments I considered, 
the SCANER code segment, in Listing 6, is the one I feel you 
would benefit the most from exploring yourself. I had to cut 
back somewhere, and this code, while it looks complex, contains 
groups of rather elementary routines, and is well documented. I 
would recommend, as reference works, the CP/M manual from 
Digital Research, and Ampro, and/or: 

INSIDE CP/M, A GUIDE FOR USERS AND PROGRAMMERS 

By David E.Cortesi 

CBS COLLEGE PUBLISHING 

383 Madison Avenue, New York, NY 10017 

ISBN 0-03-059558-4 



When next we meet you will be expected to understand the 
functioning of the following code segments taken from the main 
loop: 



CALL 
CALL 



SCANCR 
N." . EPRLW 



nam* troi 



Another reason I do not want to spend a great deal of time on 
the SCANER code is that this is a three part series to make you 
feel comfortable with the CCP's internal workings. The first 
three parts serve no other real function, though the CCP is quite 
usable. In later portions, when we begin modifying the under- 
stood CCP, it is doubtful that we will be using the SCANER code 
system. 

Meanwhile, back at the bit works, if SCANER detects an 
error, based upon the "Z" flag, which is used for the purpose of 
telling the caller an error has occurred, we jump out of the loop. 
Control is then passed to the ERROR routine, and the CCP is 



LISTING 6 


1 extract token 


from command 


line and place it into fcbdnl 


1 for 


mat fcbd 


n feb if token raaamblaa file n<M and type (f i lenam*. typ) 1 


I on 


input, cibptr pta to char at which to atart scant 


1 on 


output , 


cibptr pta to 


char at which to continue and zero flag ta reeet 


1 i 


* *?• is 


in tokert 




t •ntry pointm: 








•can ar- 


- load token into flret feb 




se anx - 


load token into feb pted to by hi 


SCANER: 


LD 


HL.FCBDN 


1 point to febdn 


SCANX: 


XOR 


A 


1 aet temporary drive number to default 




LD 


<TEMPDR) ,A 






CALL 


ADVAN 


takip to non-blank or end of line 




LD 


(CIPTR) ,DE 


1 aet ptr to non-blank or end of line 




LD 


A, (DE) 


1 end of 11 ne 7 




OR 


A 


1 »«yea 




JR 


Z , SCAN2 






SBC 


A, 'A'-l 


{convert poaaible drive apec to number 




LD 


B,A 


1 atore number (a:*0, b:"l, etc) In b 




INC 


DE 


Ipt to next char 




LD 


A, (DE) 


1 aee if it ia a colon (!) 




CP 


' : ' 






JR 


Z, SCANS 


lyes, we have a drive apec 




CP 


' 1 ' 


1 now try a aemicolon 




JR 


Z.SCAN3 


lyea, we have a drive apec 




DEC 


DE 


(no, back up ptr to firat non-blank char 


SCAN2: 


LD 


A, (TDRIVE) 


laet lat byte of febdn aa default drive 




LD 


(HL),A 






JR 


SCAN4 




SCAN3: 


LD 


A,B 


1 we have a drive apec 




LD 


(TEHPDR) ,A 


laet temporary drive 




LD 


<HL),B 


laet 1st byte of febdn aa apecifled drive 




INC 


DE 


Ipt to byte after ':' 


f 

1 iKtrict filantM from poaaible filename. typ 


1 

SCAN4: 


XOR 


A 


IIMJ 




LD 


(QMCNT) ,A 


linit count of number of queatlon marka in feb 




LD 


B,B 


(max of 8 chare in file name 




CALL 


SCANF 


If ill feb file nam* 


1 

1 extract file 


type from poaaible filename. typ 


1 


LD 


B,3 


1 prepare to extract type 




CP 


' . ' 


lif (de) delimiter is a '.', we have a type 




JR 


NZ, SCANIS 


Ifill file type bytes with <sp> 




INC 


DE 


Ipt to char in command line after '.' 




CALL 


SCANF 


Ifill feb file type 




JR 


SCAN 16 


Iskip to next processing 


SCANIS: 


CALL 


SCANF4 


1 space fill 


1 

1 -fill 


t n ax , a 


1, a2, and re 


with zeroes 


1 

SCAN16: 


,LD 


B,4 


14 bytes 


SCAN! 7: 


INC 


HL 


Ipt to next byte in febdn 




LD 


(HL) ,e 






DJN2 


SCAN 17 




1 

1 scan 


completa 


— de pta to 


delimiter byte after token 


1 


LD 


(CIBPTR) ,DE 
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restarted in the hopes that the human can get it right this time. 

Failing election of a drive/user type command, we fall through 
into the following code. 



DE.RSTCCP 






i on th» %t *ck 



DE. RSTCCP 



A, < TEMPDRt 



lout r»turn m 
Ion tha> sttck 
C i • camnnna a 

I i mm«d 14ttl v 



I must digress a bit, though I am assuming that previous 
discussions have armed you to the point where you may proceed 
without my help, and discuss the way subroutines are handled. 
Whenever we issue a CALL instruction the current program 
counter value is placed upon the stack. This value indicates the 
16 bit address which is to serve as the "way home" when a RET 
instruction is encountered. The RET instruction takes the first 
two bytes from the top of the stack, and assembles them into a 16 
bit address. It assumes this 16 bit number is the way back to the 
caller of a subroutine. It would follow that if the stack becomes 
filled with garabage and a RET instruction is executed, the 
program will go into high orbit, or just insane. We must always 
pay attention to what is on the stack, and that it is always poin- 
ting to the proper data at the proper time. 

This knowledge also allows us to simulate the function of a 
CALL instruction for our own purposes. This is what the code 
below actually does. 



As it is almost certain, unless our human has input some real 
trash, that we will either be executing an internal CCP com- 
mand, or executing a user program. In either event we may 
return to the CCP instead of doing a "warm boot." What the 
code above does is place the address of the "ReSTart the CCP" 
routine onto the stack. This is done by loading the "DE" register 
pair with the address and pushing it upon the stack. Whenever a 
RET instruction is encountered, in our internal CCP commands 
or perhaps a user program, the address of RSTCCP will be the 
return address, not the code segments following the initial jump. 
How we make the call we wiil discuss in a very short time. 



ft. I TEMPDR> 



I I s command 



■ d : co*«*nd ' 



Having prepared for an execution jump, not a call, but a jump, 
we now check to see if there is a command that requires us to 
fetch a program from another disk drive. If the temprorary 
drive register is any value other than drive "A" there is no use 
continuing our guessing game. We do a direct jump to the com- 
mand file handling routine, shown in Listing 7. 



LISTING 7 



I 

I com lila procaaslng 
I 

con: 



LO 

CP 

JR 

LD 

OR 

JP 

DEC 

LD 

CALL 

CALL 

JP 



A, <FCBFN> 

NZ.COM1 

A, (TEMPDR) 

A 

Z , RCCPNL 

A 

<TDRIVE),A 

SETU0O 

LOGIN 

RCCPNL 



LO 


A, (FCBFT) 


CP 


' • 


JP 


NZ, ERROR 


LO 


HL.COHMSG 


LD 


DE, FCBFT 


LO 


BC,3 


LOIR 




CALL 


MEMLOAD 


RET 


NZ 



I my coaaand? 

I' ' mwi conund was 'd:' to snitch 

• not <«p>, ao must ba transient or mrror 
Hook for driva spac 

I if zmro, just blank 

I adjust for log in 

• ■•t da-fault drlva 

I sat drlva xith uitr 

• log in driva 
fraatart ccp 

If 11a typa aust ba blank 



•placa dafault fila typa Icoa) into feb 
I copy Into fila typa 
13 bytas 

I load aaaory with fila apacifiad in cad Una 
Iraturn (abort) if load mrror 

call prog is tha antry point for tha axacutlon of tha loadad 

program on antry to this routina, hi aust contain tha axacutlon 
addrass of tha prograa (subroutlna) to axacuta 



Hog in dafault drlva 

Isaarch coaaand llnm for naxt tokan 

Isava ptr to drlva spac 

I sat dr 1 va spac 

ipt to 2nd fila nua 

Iscan for it and load it into fcbdn*l6 

■sat up driva spacs 



CALLPROG: 




CALL 


DLOSIN 


CALL 


3CANER 


LD 


HL.TEHPDR 


PUSH 


HL 


LD 


A, <HL) 


LD 


(FCBDN>,A 


LD 


HL.FCBDN+1 


CALL 


SCANX 


POP 


HL 


LD 


A, <HL) 


LD 


(FCBDH),A 


XOR 


A 


LD 


(FCBCR).A 


LD 


DE.TFCB 


LD 


HL.FCBDN 


LD 


BC.33 


LDIR 




LD 


HL.CIBUFF 


LD 


A, (HL) 


OR 


A 



•copy to default feb 

(froa febdn 

•sat up dafault feb 



•skip to and of 2nd fila na 
land of lina? 
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Listing 9 continued 




STACK 


EtXJ 


• 


1 command 1 1 le 


control blc 


fcbdn: 


RSRV 


1 


fcbfn: 


RSRV 


8 


FCBFT: 


RSRV 
RSRV 


3 
1 




RSRV 


2 




RSRV 


1 


fcbdm: 


RSRV 


lb 


FCBCR: 


RSRV 


1 


paocnt: 


BYTE 


NLINES-2 


CHRCNT: 


BYTE 


e 


omcnt: 


BYTE 






Itop o* stack 



Idiak name 
Mil* nam* 
Mile type 
(extent number 
I ml and a2 
Irfcord count 

I disk group Map 
(current record number 

II in** left on page 
(char count for read 

I question Mark count for tcb token scanner 



THE CODE PRESENTED THUS FAR MILL ASSEMBLE BY ITSELF INTO A WORKING 
CCP WITHOUT INTERNAL COMMAND STRUCTURES. THE ONLY ERROR RETURNED 
WILL BE UNDEFINED LABELS FOR COMMAND ADDRESSES IF THERE ARE SUCH 
ENTRIES IN THE COMMAND TABLE. OTHER THAN THIS THE CODE PRESENTED 
THUS FAR IS STANDALONE IN NATURE. 

CHAIN FILE "A" CONTAINS ALL INTERNAL CCP COMMAND MODULES. 



Ichain to internal command module file 



Failing an indicator to load a command file, 
(XXXXXXXX.COM), we have to check to see if the command 
line contains a request for an internal CCP command function. 
The routine CMDSER is the routine responsible for this fun- 
ction. In my opinion CMDSER is the most important CCP code 
segment! It may be considered an interpreter, not unlike what 
may be found in a programming language. In fact, I have writ- 
ten industrial process control languages in code similar to that 
shown in Listing 8. 



CMDSER 


Itcan for ccp-rtu dtnt COMtnd 




Inot ccp-rtu d«nt 




Mound it: qmt lew-ordtr part 




lgt»t high-order part 


M, (HL) 


l»tor» hiqh 


L, A 


(•tors Iom 


<ML> 


Ifxtcutt ccp routine 



For a basic overview of CMDSER, and the remainder of our 
main loop : if a valid internal CCP command or function is found 
by CMDSER the "Z" flag is set as an indicator for the main loop. 
If the "Z" flag is not set then no internal command has been 
detected, and we must assume that the data in the command 
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line is the name of a program on the current drive. If this is not 
the case then the COM routine will have to deal with that fact. 

You will note that the form of our command table is that of a 
character string, representing the command, followed by the 
address where that command may be found. If the command 
table scanner detects, by a match of characters in the command 
line with characters in a command name, the address of the 
routine is loaded into the "HL" register pair. 

Once the address is loaded we do a JUMP, not a call, to the 
address where the routine is located. This is an important con- 
cept. Remember that we placed the address of the CCP restart 
routine onto the stack. If our routine, when it has completed its 
function, performs a RET instruction, then program control will 
be passed to the restart routine. In a similar fashion, we could 
JUMP to an error routine that ends with a RET instruction and 
the address returned to from that routine would also be the 
RESTART routine. This assumes, of course, that our command 
routine has not trashed the stack, making the proper return ad- 
dress not the top two bytes on the stack. 

Understand fully that when we enter the internal command 
we enter the routine without commitment to any register usage, 
there is nothing to be saved, and the way home is on the top of 
the stack. What we do in that routine is entirely our affair, 
provided we do not trash the stack with the address of the way 
home at its top. This is a profound thought, and what we have 
worked so hard to present in an understandable fashion. At this 
point in time you should be familiar enough with the assembler, 
and the thought processes involved in presenting this material, 
to begin designing your own CCP commands. We will digress for 
a moment and look at the commands in this basic CCP, and the 
way they are organized. 

Recall the RCPM equate at the beginning of the primary sour- 
ce listing. This equate is used to prepare a system that may be 
open to the public, a "Remote CP/M System." This is a system 
whereby others may call your computer, by telephone, using a 
modem, and operate your equipment as if sitting at the 
keyboard. In all walks of life there are paraniod psychotics, and 
we all have to deal with people of this type. This is all fine, and 
part of life, until they start messing with our computers. To 
protect ourselves we have installed an equate that will cause the 
assembler not to include code that may be used by one of these 
disgusting creatures to trash our system. Excluding the com- 
mands noted will help to protect our system from these "twits," 
but cannot render us completely safe. 

Unfortunately these commands are no longer available to us, 
once excluded, as they might be in ZCPR3, but at least no one 
else can use them against us. Pardon my hostility towards the 
lower life forms, but I find them far more trouble than they are 
worth. Of course, this may have a lot to do with why I am a her- 
mit. 

The command table consists of strings based upon a four 
character command string. The number of characters per 
command may be expanded to no more than 8 characters. Be 
sure to change the equate that defines the number of characters 
in a command and also to fill out the number of characters with 
spaces if the command name is less than the standard number 
of characters in your system. 

Remember that once we JUMP to our command routine we 
have but one restriction upon us, not to trash the stack, which 
holds our return address. We do not really need to use the stack, 
and we could save it if we have to make use of the limited stack 
space available. The key issue here is that we can do whatever 
we wish, within the confines of the space allowed the CCP 
program itself. 

The concept of named directories is possible to implement 
isn't it? What if the routine to log in a given directory were inser- 
ted as a command name? And, what if, when we loaded the user 
area number to print the command line prompt, we used the 
user area number to index a table of user area names? Or what 



if we had a hardware sequence we used all the time and installed 
as a CCP command? The answer to all these questions is "why 
not," "or is there a reason why we couldn't do all these things?" 
The only restriction we have upon us is the size of the CCP itself, 
and the reality that if we add a command, we would have to 
delete another command to make room for it. In ZCPR3 they did 
away with the internal directory program, allowing the user to 
select from many sorted directory programs set aside as COM 
files. 

What can we do from here? Well, I know it is rude to answer a 
question with a question, but what are the limits of your 
imagination? 

In the next installment of this series I will present the "nor- 
mal" CCP commands and show you how I develop new CCP 
commands. I would hope that you would study those portions of 
the code I have left to your own investigation, and having done 
that, you will think about the way internal commands are 
processed. We just jump to a spot inside the CCP, having en- 
tered the name of the command in the command table, followed 
by its address. We also have the way home sitting on the stack, 
should we need it. What we may do from this point onward is 
only a matter of what we want to do in the space allowed for such 
things. But then again, there is nothing that requires the address 
following the command-name string to be in the CCP, it can be 
anywhere, now can't it. Hmmmmmm Something to think about 
eh? ■ 
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Editing The CP/M Operating System 



by Walter E. Pfiester 



Introduction 

Editing, changing and operating on your CP/M* operating 
system can be a real hassle using "DDT.COM® " or 
"XMAN.COM". These machine code editors work directly on 
the system tracks. It is much easier to work on these tracks if 
they are saved as a file first. This article wi.'l detail how to save 
the operating system tracks as a file and later, after editing or 
changing this file, placing this file back on the disk in the proper 
location for use as your new version of CP/M. 

Saving the Operating System as a File 

You will have to have "M0VCPM.COM" and 
"SYSGEN.COM" on the disk you want to operate on. In ad- 
dition, I find it useful to have 'SD.COM" (or the enhanced ver- 
sion, "S.COM", "STAT.COM", and 'EDFILE.COM" on the 
same disk. The first two files are used to measure the size of the 
files. The later file is a machine code editor, in the public 
domain used to dump and edit, full screen, any file using HEX 
formats OR ASCII codes. It is not the intent of this article to 
delve in to the use of "EDFILE.COM'. That can be best handled 
by downloading the "EDFILE.DOC" file from your RCP/M 
library. 

The first thing that you must do is to measure the size, in 
hexadecimal pages of memory, of your operating system. The 
easiest way to do that is to type: 

A>movcpm63* 

For our purposes here we want to find out how many pages of 
memory are required for a 63K CP/M system. If you are using a 
64K system then type movcpm 64 *. For this article I will use a 
63K CP/M system. As a result of the command above, what 
results is as follows : 

CONSTRUCTING 63k CP/M v«r» 2.2 
READY FOR "SYS6EN" OR 
"SAVE 34 CPM63.COM" 



♦ > Thi» is th« numtomr *>• want! 

The 63 above designates the operating system size. If you are 
going to change the size of the system for later editing, recom- 



piling or whatever, type the size in place of 64, ie MOVCPM 55 * . 

The important thing here is to write down the number after 
the word SAVE. What MOVCPM has done for us is 
automatically calculate the amount of memory required to save 
the CP/M image as a file. You are done using "MOV- 
CPM.COM". 

Now type "SYSGEN". In response to the question SOURCE, 
type a <CR>. When prompted as to the destination, type 
another <CR> . Your entire CP/M operating system is now in 
RAM, starting at lOOh. To save this image as a file type "SAVE 
34 CPM63.NEW". 34 is the number of hexadecimal pages that 
you came up with above with M0VCPM.COM above. 
CPM63.NEW is the file name given to save the system image as. 
It could just as easily be named anything ! It should also be noted 
at this time that the operating system saved has ZCPR on it 
(Micro Cornucopia's version) and it was created using instruc- 
tions on their disk K22. 

Editing and Using the New (SYSTEM) File 

Now the file "CPM63.SYS" can be edited, changed, whatever. 
I routinely use "EDFILE" to edit machine code. It is a full 
screen editor that can be used in both the ASCII and Hex fields. 
Besides which, it is one of the best FREE, public domain pieces 
of software ! 

Using EDFILE 

As an example in using this powerful tool, I will change the 
logon message on cold boot to something more meaningfull 
than: 



to: 



KAYPRO II 63k CP/M vers 2.2 

63K ZCPR-2 9/20/84 
882-2.2 



In addition I will show you how to edit the operating system to 
autoload a file on cold boot. 

The file we'll be editing is CPM63.NEW created above. To edit 
using EDFILE, type the following: "EDFILE CPM63.NEW" 
What will result is shown in Figure 1. 



A0>EDFILE B:CPM63.SYS 



V»r»: 01-10-841 by: 
Fil«: B!CPH63.8YS 



J.C.Kaltw** 
Racord: 



fc M.J.Hcmko, K3RL 

I) LOF: 00068 <0044H> 



00 01 02 03 04 05 06 07 08 09 0A 0B 0C 00 0E 0F 



WW 

0010 - 

0020 - 

0030 - 

0040 - 

KWJV — 

0060 - 

0070 - 
7S«arch 



C3 3E 02 
20 31 39 
45 53 45 
20 28 43 
00 29 29 
D8 FE 7B 
CO 57 01 
C8 E5 CO 
String - 



43 4F 50 59 
37 38 2C 20 
41 52 43 48 
29 20 31 39 
29 29 29 29 
00 E6 5F C9 
3E 0A CD 57 
57 01 El 23 
VKAYPRO IIS 



52 49 47 

44 49 47 

20 50 6F 

38 32 2C 

29 C9 0E 

5F 0E 02 

01 C9 E5 

C3 6E 01 



48 54 20 

49 54 41 
72 74 69 
20 4E 4C 
01 CD 05 
CO 05 00 
CO 5E 01 
4F 2A 01 



28 43 29 
4C 20 52 
6F 6E 73 
53 6F 26 
00 FE 61 
C9 3E 00 
El 7E B7 
00 11 18 



1 23456 789ABCDEF 

>C>.COPYRI8HT <C>< 

> 1978, DIGITAL R< 
>eSEARCH Portlon«< 

> <C> 1982, NLSo*< 
>.>>>>>) >I. .M. .**< 
>X~<Pf_I ..H..I>.< 
>m. >.MW. tmH^.a^7< 

. ••(>) . O* . . . . < 



Figure 1 
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At the prompt above, type an "S". EDFILE will ask you for 
the string to search on. What we are doing, is searching for an 
ASCII string < EDFILE can also search for a HEX string) . Reply 
with a backslash " \ " and the string itself followed by another 
backslash, as shown above. Edfile will then locate the string as 
shown at address 1EE0 as show in Figure 2. This is the begin- 
ning of the log on message we are going to change. 

Type <CTRL> E. This will place your cursor in the HEX 
field. To move about, use the arrow keys. To change to the ASCII 
field, type another <CTRL> E. Again, the arrow keys will 
move you about this field. To edit the message, type over the 
message already there. Remember, the carriage return and line 
feed can not be edited in the ASCII field, they need to be added in 
the HEX field Now that you have a new log in message, let's 
save it to disk First, type a < CTRL> W. This will write all your 
changes out to RAM and place you at EDFILE's command 
level. To write the changes to disk and return to CP/M, type a 
"Q" ( for QUIT ) . Your are done ! 

You have a new file to load in place of your old CP/M 
operating system. Once you have completed changing this file, 
placing it back in the correct location on disk is very easy. Type 
SYSGEN CPM63.SYS <CR>. The prompt will ask you for the 
drive to place the system image to. Type A (or B or whatever 
drive you want it to go to) as shown in Figure 3. 

That's all there is to it. The next time you boot off the drive 
you'll have your new system image on it with the new log in 
message 

Let's do this again, in addition to the new log in message, have 
the system autoload "S $AL". "S" is a modified version of "SD- 
92" that I have modified. The $AL command tail will lok at all 
user areas, and list the directory of all libraries. Now let's 
modify the operating system, again. 

This time, use the ASCII search again to look for the word 
"COPYRIGHT" (see Figure 4). 

Note the pattern of HEX 20's above. At location 0887 (which 
now contains OOh) place the number of HEX bytes the command 
line will contain, in this case, 5. At location 0888 start the actual 
command. The result is shown in Figure 5. 



Save this file again, and put it in place of your system tracks. 
Now the next time you cold boot, the log in message will be 
meaningfull and you will automatically run "S SAL". 

Summary 

When you obtain a copy of "EDFILE.COM" make sure to ob- 
tain a copy of the accompanying .DOC file, it is absolutely essen- 
tial. Another feature I have not heretofor mentioned, ED- 
FILE. COM has HELP features built in! 

I also use this method of editing my CP/M system in order to 
test my compiled Turbo Pascal* files under different size 
operating systems (saved on disk as CPM64.COM, CPM63.COM, 
CPM62.COM, etc.). Additionally, I have used this method to 
change my operating system (changed the resident CP/M 
command "USER" to "U", logon procedures, autoload fun- 
ctions, prompt messages, and different size operating systems 
with new logical assignments for my disk drives. Try this 
system and I don't think you'll ever go back to using 
"XAMN.COM" or "DDT.COM" to modify your .COM files 
again! 

You can write to me (Walter E. Pfiester) in care of THE 
COMPUTER JOURNAL or direct to my home at 1 Skadden 
Terrace, Tully, N.Y. 13159. Please include a self-addressed, 
stamped envelope or a disk formatted to KayPro IV along with a 
stamped return mailer. I do not respond to mail without a SASE. 



Special Disk Available 

The EDFILE and SD-92 programs Walt uses are not currently 
part of our users' disk library, but are available from The Com- 
puter Journal in 8 inch SSSD or a number of 5.25 inch formats for 
$10. Ask for the "EDFILE" disk, and fully specify the format for 
your machine. Other selected programs will be included, 
depending on the disk capacity . g 
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Figure 2 



A>SYS8EN CPM63.NEW 

KAYPRO SYSGEN VER 2.2 

DESTINATION DRIVE NAME <OR RETURN TO REBOOT) b 

DESTINATION ON b, THEN TYPE RETURN <cr> < 



-TYPE THIS 
-TYPE THIS 



FUNCTION COMPLETE 

DESTINATION DRIVE NAME <OR RETURN TO REBOOT) <cr> < — TYPE THIS 

Figure 3 



The Computer Journal / Issue #23 



27 



Film: B:CFtl63.SYS Record: 00017 IWUH) 



lof: 00068 < 0044m 



00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F 



0880 
0890 
08A0 
08B0 
08C0 
08D0 
08E0 
08F0 



- 54 



C3 5C E7 
20 20 20 
20 28 
54 41 4C 
00 00 00 
00 00 00 
00 00 00 
00 00 00 



C3 58 
20 20 



43 
20 



E7 
20 
20 
45 



29 

52 

00 00 00 

00 00 00 

00 00 00 

00 00 00 



7F 00 20 
20 20 43 
31 39 37 
53 45 41 
00 00 00 
00 00 00 
00 00 00 
00 00 00 



20 20 20 
4F 50 59 
39 2C 20 
52 43 48 
00 00 00 
00 00 00 
00 00 00 
00 00 00 

Figure 4 
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Figure 5 
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Here's a catalog any serious computer tinkerer needs. It's a 
treasure-trove of stepper motors, gear motors, bearings, gears, 
power supplies, lab items, parts and pieces of mechanical 
and electrical assemblies, science doo-dads, goofy things, 
plus project boxes, lamps, lights, switches, computer furni- 
ture, and stuff you might have-never realized you needed. 

All at deep discounts cause they are surplus! 
Published every couple of months, and consecutive issues 
are completely different. Send $1.00 for next three issues. 
JERRYCO, INC. 601 Linden Place, Evanston, Illinois 60202 
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INDEXER 

Turbo Pascal Program to Create Index For Almost Any Purpose 

by Jerry Houston 



For a while I worked my way through school as a baker on 
weekends, and it didn't take too many months of pounding dough 
for me to decide I'd rather be working with a computer. The 
owner of the bakery had bought an Apple II +• to operate a 
relatively simple database to keep track of recipes, and I was 
given the task of writing the program. 

Well, that simple database turned out to be SO useful that my 
boss kept thinking of other aspects of the operation that could 
benefit from some computerizing, if I didn't mind writing the 
programs instead of busting my butt in the bakery. Let me tell 
you, when HE ran out of new ideas, I supplied all I could think 
of! 

Eventually, of course, the programs were integrated into a 
database system that operated on multiple Apple He's, connec- 
ted to hard-disk storage from ICE (Space Coast Systems in 
Florida), with a file server. I wrote routines that let the various 
computers share files without conflict, but that's another story 
for another time. The point is, when it came time to document 
this system of programs— both for the. non-programmer users 
and for the benefit of any future maintenance programmer— I 
ended up with more than 200 pages of system manual. 

For any kind of system manual to be useful, it just HAS to 
have an index. The index needs to be sorted alphabetically, and I 
figured that I would need this service often enough to make 
writing a program to do it worthwhile. In fact, this has become 
one of my most-often-used utility programs, as there seems to 
be no end of indexing jobs for any writer or programmer. 

There are many good uses for an indexing program, besides 
the obvious ones mentioned. Using INDEXER, for example, you 
can make a sorted index of a year's worth of The Computer 
Journal, making it easy to find a particular article not only by 
name, but by any number of subject cross-references. You can 
use INDEXER to catalog a record collection, or nearly any 
other kind of collection. 

The program is designed so that sorted index files can be ap- 
pended, making it possible to create a simple index in one sit- 
ting, then go back and do the heavy-duty cross-referencing 
later. The files that are created by INDEXER are ordinary text 
files, with no special characteristics other than that they are 
sorted alphabetically. Thus, once the index file has been 
created, it's an easy matter to use your favorite word-processor 
(I can't help it - mine's still WordStar* ) to format that plain- 
vanilla listing into a good looking index. 

I have provided source code in the past for several programs, 
usually making it for Kaypro 4-84* . This time there are listings 
for Osborne Executive* (which I use at work), and for IBM- 
PC* and true compatibles. I'm hot about to "abandon" CP/M 
in my writing, but I do intend to feature newer systems as well. 

If anyone would like to save the time needed to type this sour- 
ce code, The Computer Journal can supply the program on 
diskette for MS/PC-DOS, Osborne Executive and Kaypro 4-84. 
Though they can't be expected to re-write the program 
specifically for additional computers, they can supply one of the 
above-mentioned versions on a different diskette format, and 
you can do your own customizing. Ordering information is at the 
edn of this article. 

As my writing is always tutorial, besides offering what I think 
are useful program ideas I always go into detail about some of 
the features of Turbo Pascal. This time, it's additional power 
that came with v3.0, and in particular, command line 



parameters and windowing. 

Running The Program 

INDEXER is nearly self-documenting, because there just 
isn't the need for much complexity in a program like this. There 
are a few things you need to know, however. 

When the program has been compiled as a COM file, it can be 
run with a parameter supplied on the command line. That 
parameter will be the name of the index that's to be created, 
without an extension. INDEXER will append the extension 
NDX to the name you choose. 

If the file you've named already exists, INDEXER will open it 
for appending data to the end of that file, present a screen that 
will let you type in more entries and page numbers, and let you 
know how many records were supplied from the file. 

If the file did not exist before, it will now— INDEXER will 
create the file for you and present the data-entry screen. If you 
try to run the program INDEXER without specifying a file 
name at all, there's a "sorry about that..." message printed and 
you're returned to the system. There just isn't anything useful 
you can do without supplying a file name, so the program in- 
sists. 

Having started successfully, you'll be at the data-entry 
screen. The CP/M version of the program simulates using a 
window for data entry, as the 8-bit version of Turbo Pascal does 
not support windowing (it would have to be custom- 
implemented for every possible terminal type). The version 
written for 16-bit machines makes use of a window for data in- 
put, making the program easier to write and smoother-running 
in the end. 

Fields are defined for 40-character items, and for up to 6- 
character page numbers. The page numbers are represented in- 
ternally as strings, not integers, making it possible to use 
decimal points or hyphens in the page numbers if desired. There 
are good reasons for doing it this way— page numbers are often 
best referenced according to sections or chapters, such as 1-23 
or 1.23 to indicate page 23 of section 1. Also, for catalogging ar- 
ticles from magazines, you might want to include an issue num- 
ber followed by a page number, such as 22:45 to indicate page 45 
of issue 22. If you find that you need more than 6 places for page 
numbers, there are only a few simple and obvious changes 
needed in the program. 

When the last entry has been made (for this session), enter 
one called 'END'. The program will also be looking for 'End' 
and 'end', so any of these can be used. Remember, of course, 
you won't be able to have an actual entry in your index called 
'END' (or any of the above variations on that), but that 
shouldn't be a problem. 

If you're customizing this program, it's possible to write and 
use a function called GetStr which will get a string from the 
user, but that will also return a message that a FUNCTION 
KEY was pressed. I'll include a listing of that function at the end 
of this article for anyone who's interested— it can be very useful 
in many programs. Here, though, it seems perfectly natural and 
logical just to type 'END' to end the session. 

The file will be (re)sorted at this point. The program uses a 
'shaker sort' that is an improvement on the simplest bubble sor- 
ts, but still simple and convenient to code. The example index 
that accompanies this article took about 5 seconds to sort on an 
XT-compatible. If you've added entries to an existing index file, 
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they will be integrated into the file in sorted order. Then the 
finished file is written to disk, with the name you used and an ex- 
tension of NDX. 

The records are written to the index file with the entries 
separated from the page numbers by commas. This has been 
most useful whenever I've used the program, but that - of course 
- could easily be modified. You might prefer a hyphen 
semicolon, or just spaces as a separator. 

The resulting file is a standard text file (file of characters) in 
which each line is terminated by a carriage-return. It's really 
easy to edit the index file with a word processor, separating the 
entries into blocks of records that start with the same letter. 

The Program Source Code 

Since the two versions are nearly the same, I'll provide a 
listing and a detailed description of the MS/PC-DOS version. 
I'm sure that readers intending to modify the Osborne version 
for other CP/M computers will find it an easy job, and there just 
aren't enough differences to justify printing two separate source 
listings. 

Anyone with an '84-or-later Kaypro should refer to page 5 of 
issue #21 of The Computer Journal for a review of the constants 
that can be used for special screen attributes, such as reverse 
video, underline, etc. 

We should begin with the Main Logic, which is the last part of 
a Turbo Pascal program, and comes between the 'Begin' and 
the 'End' that has a period after it. Some of the instructions 
given in the main logic refer to functions and procedures that 
are supplied as part of Pascal, and others refer to functions and 
procedures that we have defined earlier in the program. That's 
why the main logic section comes last— to be used, a variable, 
function, or procedure must already be 'known' to the compiler. 

The first statement in the main logic shows what to do if 
ParamCount is zero— in other words, if no filename parameter 
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was supplied with the program name when it was run. Indexer 
will either append new information to the end of an existing file, 
or it will create a brand new file if needed. But there's just 
nothing it can do without a file at all, so this block of code prints 
an error message, makes an unflattering sound, and returns the 
user to DOS. 

Incidentally, this first statement is a compound statement, as 
it contains a block of code starting with a 'Begin' and finishing 
with an 'End;'. Whenever the syntax of Pascal calls for a 
statement, several statements can be included as need, 
provided they are formed into a block as shown. 

The second statement assigns the value of the filename given 
with the program to a variable called 'STR' and tacks on the ex- 
tension ' NDX' This is how the parameters that are added at the 
command line can be accessed within your program. Param- 
Count is a reserved variable that will contain the number of 
parameters that followed the program name on the command 
line, and ParamStr( ) is a reserved string array that contains 
the actual parameters as typed. If ParamCount is zero, then no 
parameters were provided for the program. 

The variable 'Index' is used throughout the program to keep 
track of the number of entries that have been made. It is 
initialized to zero before an attempt is made to read an existing 
index file with the procedure 'ReadFile'. If a previous version of 
the file exists, then 'Index' gets incremented as each record is 
read into memory. Thereafter, 'Index' is incremented as new 
entries are supplied by the user. 

That happens in the procedure called 'GetEntries', after 
which a window statement resets the default window to a full 
screen. A 'Please WAIT. . . ' message is displayed while the array 
of entries and page numbers is sorted in the procedure 'Shaker- 
Sort', then a message verifies how many records now exist in 
the index file. 

Pressing <RETurn> then executes the procedure 
'WriteFile', which ends it all. 

Operating the original version of this program on a CP/M 
computer with floppy disk drives took long enough at each I/O 
step that the 'progress' or 'status' messages were displayed on 
the screen long enough to be useful. Changing to a 16-bit com- 
puter with a hard drive made such a speed difference that I in- 
serted a number of statements that say 'Delay (1000)', just to 
keep a message on the screen for a full second. Even if all the 
message says is 'Please WAIT... Sorting File', it's rude for it to 
flash by so fast that the user can't read it. These delays have ab- 
solutely nothing to do with the processing that goes on in the 
program, and they may all be removed to speed things up. 

Example of Index 

For the unconvinced, here's an example of an index that I 
made in just a few minutes. I indexed a copy of The Computer 
Journal that was handy, so the subject could be something of in- 
terest that's available to all the readers. This example is 
reasonably thorough, but as you read through it you'll think of 
many other entries that could be used to cross-index even fur- 
ther. The idea is to find each important topic or concept, then en- 
ter it as many times as you can think of ways to refer to it. Then 
when you want to look up that subject in the future, there will be 
that many chances of finding it where you look first. 

Naturally, the first entries to make are the titles of the various 
articles, so you can find in which issue and on what page a par- 
ticular one is printed. Then additional entries are made on a 
page-by-page basis. Since the index file can be started at one 
time and re-used many times afterwards, there's no need to try 
to index a whole issue in one sitting, or to index it thoroughly the 
first time through. If the object IS to catalog several issues of a 
publication, the file can be appended with each issue that comes 
out. 
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An example of an index for Issue #21 of TCJ is shown below : 



ADC Systems, 19 

ADC Systems - Applications, 21 

ADC-1 Data Acquisition System - Ad, 4 

APHOTEK 1000 - EPROM Programmer Ad, 26 

Advertiser's Index , 50 

Affordable Engineering Software - Ad, 12 

Alliance Computers - Ad. 44 

Analog Data Acquisition and Control - Ar, 19 

Analog Fundamentals, 19 

Applications • ADC Systems, 21 

B 

BDS C Compiler - Ad, 7 

BERSEARCH Information Svcs - Ad, 33 

BMON - In-Circuit Emulator - Ad, 28 

Back Issues Available - Feature, 48 

Basic-52 Computer/Controller, 43 

Blankenship BASIC - Ad, 21 

Books of Interest ■ Feature. 32 

Build the Circuit Designer 1MPB - Article, 35 



CD-I MPB - Construction of, 38 

CD-I MPB - Parts Diagram, 39 

CD-I MPB - Programming, 35 

CD-I MPB Parts List, 40 

CD-I Memory Board Schematic, 41 

CTM - Ad, 39 

Classified Ads - Feature, 49 

Clockworks - Ad, 43 

Construction of CD-I MPB, 38 



DIP Components - Removing, 14 

Data Acquisition Software - Ad, 50 

Desgn & Applicat of Sm Std Components, 32 



Echelon. Inc - Ad. 45 

Extend-50. 43 

Extending Turbo Pascal - Article. 2 



Functions -Pascal, 2 



GEMINI Robot -Ad, 17 

H 

HD64180, 52 

HD64180 Communications Software. 50 

HISPEED.PAS - Program Listing, 25 

HISPEED.PAS - Program Listing, 29 

Helping Hands - Soldering Tools, 17 

Higher Sampling Speed for ADC-1, 42 

I 

Intellicomp - S-100 Board - Ad. 18 



JERRYCO, Inc - Ad, 44 



Kaypro 4-84 Screen Attributes - Table, 5 

L 

LOGGER.BAS - Program Listing, 26 

Lawson Labs, Inc., 50 

Linear Optimizer - Acme Computer Company, 42 

M 

MICROMOTION - Ad. 47 

MMS FORTH - Ad, 22 

MPB Block Diagram - Circuit Designer 1, 36 

MTBASIC - Used for ADC operation. 31 

MTBASIC Compiler - Article. 10 

MasterFORTH - Ad, 47 

Microcomputer and Interfaces Ad, 31 

Microport 32, 43 

Mid-Level Languages. 1 

N 

NGS Forth -Ad, 20 

NO LIMIT - Ad. 47 

New Products - Feature, 42 

P 

Pascal - Variable Storage. 3 

Pascal vs. BASIC, 2 

Portapac, 51 

Printed Circuit Boards - Unsoldering, 33 



Procedures - Pascal, 2 

Programmable Microcontroller - Basicon, 42 

Programming the CD-I MPB, 35 

Public Domain Software Center. 39 

Publisher's Statement. 1 

R 

RAM 80e - Ad, 43 

ROMable MTBASIC. 42 

Real World Computing. 19 

Resolution - Analog/Digital, 20 



S-C Macro Assembler - Ad, 34 

Solder Bridge - Removing, 1 1 

Solder Suckers, 9 

Solder Wick, 11 

Soldering -Theory, 8 

Southern Pacific Limited - Ad, 37 

Surplus Parts Resource - Ad, 44 

T 

TBASIC, 50 

Technical Engineering BASIC, 50 

TelevideoTPC-1,51 

The Computer Corner • Column, 52 

Turbo Pascal - Include Files, 4 

Turbo Pascal • Tutorial, 2 

U 

Universal MAC INKER, 43 

Unsoldering: The Arcane Art - Article, ! 



Vendors - ADC Systems, 23 
Vendors - Soldering Tools. Boards, 34 



Wabash - Diskettes - Ad, 30 
Write-Hand-Man - Ad. 26 



Z System - Ad, 45 

Z-System - Ad, 13 

Z80Plus,52 

Z80ASM - Assembler - Ad, 15 



For a magazine so full of technical reference material as The 
Computer Journal, it's well worth the 30 minutes or so that it 
takes to index an issue. If EACH issue is indexed as it arrives, 
then the same file can be used to make a master index that 
spans more than one issue. If my example had been part of a 
larger plan of that type, each page would have been entered with 
the issue number first, such as : 

Z-System - Ad, 21-13 

Z80 Plus, 21-52 

Z80ASM - Assembler - Ad, 21-15 

Any small errors that are made while entering the subjects 
and page numbers can safely be ignored, as you'll have the op- 
portunity to make corrections when you go back with the word 
processor to format the file into a printable index. If you notice 
too late that you've flubbed an entry, just make a note of it and 
re-enter it correctly. When you edit the sorted file you'll be able 
to make the correction easily. 

Summary and Conclusion 

INDEXER is a program that finds use in many different ap- 
plications. It can keep track of technical articles, catalog small 
electronic parts in numbered bins or drawers, keep track of bot- 
tles in a wine cellar, or catalog a butterfly collection in 
alphabetic order for easy reference. 

Since the file that's produced is a standard character text file, 
it can easily be formatted into a printed index or used as the in- 
put file for a program to search for records and display them to 
the computer screen. 

INDEXER could even be used to keep track of program and 
file names, and the number of the diskettes that they're on, for 
anyone who doesn't already use a system like MCAT. 



GetStr Function for Keyboard Input 

Finally, as advertised eariler, here's an example of the GetStr 
function that I use in many programs. It provides a way to ob- 
tain data in string information, and to be able to read the IBM 
function keys at the same time. If a function key is pressed while 
the string is being entered, then the string that's returned will 
contain only 'Fl' through 'FlO'to represent the function key that 
was pressed, regardless of what was being typed up to that 
point. 

This means that every section of a program that gets 
keyboard input from the user can have a 'bail-out' key, such as 
F10 or a HELP key, such as Fl. Even if another entry has been 
started, the function will still return the value of any function 
key that's pressed. 

If there are other characters that you would like your version 
of GetSTr to recognize, be sure to add them to the case structure 
as shown. In your main program, don't forget to declare a 

TYPE STR = String [ 30 ] ( or other length ) 

so that a string can be returned by this function to the calling 
logic. 

Using GetStr in a program is as easy as assigning to a string 
variable the value of GetStr To input a name— but be ready to 
leave the procedure if an F10 key is pressed, you might code a 
couple of statements as shown in Listing 2 ■ 



The source code is available on MS/PS-Dos, Kaypro 2 SSSD, 
or AMPRO 5.25 inch DSDD for $10 postpaid. Inquire about other 
formats. We are planning on having our RBBS on line in May, 
and these files will available on the board at that time. 

i Listing 2 on page 43 1 
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The AMPRO Little Board Column 

by C. Thomas Hilton 



Well, after months of learning the ins, and outs, of the AM- 
PRO* 1A CPU card I received the newer IB system for 
development. While the 1A is still available, it is available only 
in OEM quantities. About the only place you can get the 
ORIGINAL LITTLE BOARD is through some of the mail order 
houses. The 1A CPU does offer a cost advantage, but the IB is 
far more powerful for industrial work. 

The IB CPU has the SCSI bus on card, instead of requiring an 
adapter option, plus an 8 bit input port. The system ROM may be 
expanded in capacity, and there are a number of jumper options 
for various system attributes. I swapped the 1A CPU card in my 
Series 100 with the new card, and that will be one of the projects 
we will discuss this issue. 

Making the Change 

The first thing to do is to unplug ALL the cables from the rear 
of the enclosure. There are some nasty voltages exposed in 
there, and the packaging is tight enough where it just isn't worth 
the risk to have the power line connected. I always feel better 
when I can look at the back of a chair and see both ends of the 
power cable. I don't lose as many readers that way. 

□ Remove the four screws on the long sides of the enclosure, 
on the bottom of the device. They are the ones set in the slots 
where the top folds over the bottom plate. 

□ There are three more screws on the rear face of the 
system, remove them as well. Put the screws in a cup so you 
don't lose any of them. The case metal is thin, so we have to be 
careful not to put the screws in too tight, when we put it back 
together. 

□ The top just slides off toward the back of the system. 
Remove it now. 

D See the two drives on the right, as the system faces you? 
Find the "L" flange where the power supply is mounted on the 
left, and the 1A CPU card is mounted on the right, next to drive 

"A." 

□ Don't try to remove the CPU mounting screws, there are 
two on the bottom edge as well as on the top edge. We'll have to 
take the drives out to get at everything. See that "P" shaped 
aluminum bar on the top of the drives? That holds the sliding 
case cover in the proper position. Take out the two screws that 
hold the "P" bar to the two disk drives, and save them in the cup 
as well. 

□ Lift up the case and locate the two screws in a line under 
each disk drive. Remove them, but only one set at a time, star- 
ting with drive "B." 

□ Mark the cables with a felt marker on all connectors. Mark 
the cable side and the board side of each connection. The next 
time you will know what goes where, but the first time, let's 
mark them. 

□ Now then, drive "B," with all the cables removed just 
slides straight out the front. It sometimes jams. Just pull it 
straight out, but don't force it. If it gets caught, just push it back 



in and try again. Place the drive out of the way, but so we can 
tell which drive is which. Yes, it does matter which drive is 
which. They each have different jumper settings, though we 
don't need to worry about jumpers for this project. On the lower 
right hand side of the drive you will see several white boxes. 
There are numbers where the boxes are. One box is near the 
number "2" on the circuit card, so this is indeed dri ve " B . ' ' 

G Take out drive "A" in the same way we removed drive 
"B." 

G Fine, now see the four screws around the edges that hold 
the CPU card in place? Don't remove the card yet, I want to 
show you something. Look at the flywheel side of the drive. The 
holes on the CPU card and the disk drive match! The CPU card 
is designed to mount to a standard 5V 4 inch drive. The circuit 
board sets right down in the recess. It adds only about a half inch 
to the drive's profile, though we always design for at least ^4 in- 
ch clearance from the card or flange, when it is above the card. 

G Now mark all of the cables, to be sure we get them all back 
in the same place, and remove the mounting screws. Be careful 
as the card can be damaged by static electricity, even the 
amount on our bodies. Just handle the card as you would a 
phonograph record, along the edges. Good PC designers always 
put the power and ground bus structures around the edges. Lay 
the old card out of the way, for now. 

G The new CPU comes in a brown plastic bag, with a yellow 
caution seal. If the seal has been broken there is no way of 
telling if the board is good or not. AMPRO tests the boards and 
seals the package before they ship them. The bag is conductive, 
so there is protection from static, and handling by untrained 
people. Now open the bag by ripping the seal, and remove the 
board, touching only the edges. 

G Put the new card in the machine in the same way we took 
the old one out. Put all the mounting screws back in, snug, but 
don't screw them in tight, just snug. If you tighten them down 
too far you may damage the card. 

G Put all the cables back on the card. We marked them so 
we'd know where they went. AMPRO made the new card with 
all the connectors in exactly the same places, nice of them to do 
that eh? 

G Get drive "A," reconnect the cables, and set it in place. Lift 
up the device and replace the two bottom screws. Don't tighten 
them down as we will have to adjust them for proper placement 
later. Don't put in the top screws yet. 

G Now replace drive "B" in the same manner, making sure 
the cables are all in the right places, and that the two bottom 
screws are not tightened fully. 

G At this point we want to assure that the drives are set 
properly in relation to the case front. I leave an "ease" space of 
about 1/8 inch in the center between the drives. This lets us use 
that little plastic flange on the drive bezel to position each drive 
on the outer edges of the case opening. Now tighten the two bot- 
tom screws to set the drive in place. 
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□ Locate the "P" shaped positioning bar. Mount it with the 
thin edge to the left, the wide portion over the drives. What this 
piece does is position the outer case in relation to the heavy front 
panel. We want to set this bar as close to the front of the en- 
closure as possible, and make sure there is an equal space on 
each side of the bar. This will keep the sliding case top properly 
positioned. Just to be sure you can slide the case back on, and 
move it back and forth, with the "P" bar loose, to see what I 
mean. Once positioned, tighten the bar mounting screws. 

□ Slide the case back on, and replace all of the case mounting 
screws. BE CAREFUL! The metal is very soft and will strip 
easily if you try to tighten the screws too tight. 

Now power up the system and assure that everything works 
properly. 

KTERM Update 

I really should get a terminal I guess, but the Kaypro* does 
the job until I see what I will be doing in the 16 bit developments. 

LISTING ONE 



The original version of KTERM, written in TURBO 
PASCAL* , served to interface the Kaypro 4-84, and later 
Kaypro versions, to the AMPRO Series 100 as a "dumb ter- 
minal." The original KTERM was suitable for use in all ap- 
plications except the use of WordStar* . The overhead of the 
TURBO runtime library, coupled with the internal functioning 
of WordStar, required faster data processing by the Kayp.o. 
The patching of WordStar's internal delay tables did nothing to 
improve the situation. This CROWE assembler version of 
KTERM is fast enough to handle all known commercial, and 
public domain software applicable to either machine. This ver- 
sion has replaced the TURBO PASCAL version for all tasks. 

The primary difference to the user, other than an 8K reduction 
in program size, is that the " A _" character, (control/ un- 
derline), is now the escape character. The null character is 
used, in the DOS direct console function request, to indicate a 
lack of keyboard activity. 



TXRDY 

RXRDY 

DATPRT 

STATUS 

DTRWT 

DTRRDY 

» 

I 

I 

DOS 

I 
I 
1 
I 
I 
% 
\ 
» 



Hermit Software'* 
Crow* Assembler Source Coda File 

<c> 1985 C. Thomas Hilton 
Program: KTERM. COM < WordStar Vtnion) 
Function: 

The original version of KTERM, written in TURBO PASCAL, was 
-found to be incompatible with WordStar. This version of KTERM, writter 
in the CROWE assembler, corrects the defects of the original version. 

Author: C. Thomas Hilton 12/16/85 

Index: KTERM.COM 
KTERM. CRW 

LIST 

TITLE 'KTERM. CRW * 

NLIST 



SIO A Equates 

EQU 4 

EQU 1 

EQU 4 

EQU 6 

EQU 68H 

EQU 0E8H 

System Equates 



EQU 
ORG 



5 
100H 



I SIO transmitter ready mask 

I SIO data receiver ready mask 

ISIO data port 

ISIO status and control register 

|3I0 data terminal busy data mask 

ISIO data terminal ready data mask 



IBDOS jump vector 



Initialize The Kaypro "Serial Data Port" to: 

8 bit data word 
1 stop bit 
Even Parity 

As well as preserving the functioning of the standard keyboard channel 

LD A, 18H 

OUT (STATUS), A 

LD A, 1 

OUT (STATUS), A 

LD A,0 

OUT (STATUS), A 

LD A, 3 
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OUT 


(STATUS) ,A 


LD 


A.0E1H 


OUT 


(STATUS). A 


LD 


A, 4 


OUT 


(STATUS) .A 


LD 


A,47H 


OUT 


(STATUS), A 


LD 


A, 5 


OUT 


(STATUS), A 


LD 


A.0E8H 


OUT 


(STATUS), A 



LD 



SP.STACK+16 



Idefine a local stack for DOS calls 



Print Herald On Kaypro Scretn 



HERALD: 



main: 



I 
I 
I 

abort: 



i 

bye: 



SNDCHR: 



SCHR1! 



LD 
LD 
CALL 
JR 

BYTE 
DATA 
DATA 
BYTE 
DATA 
DATA 
BYTE 



DE, HERALD 
BC,9 
DOS 
MAIN 

26 



I jump ovtr herald print string 
I clear the screen 



'Hermit Software" s KTERM Dumb Terminal' 
10 ! BYTE 13 ! BYTE 10 

9 f 

Press ~_ To Abort' 
13 ! BYTE 10 ! BYTE 10 ! BYTE 10 < BYTE '»' 



Enter Primary Function Loop 

The only operator control is •*_ as an abort character. A null character 
cannot be used as it is trapped by the keyboard input scan and used to 
indicate that no character is ready from the keyboard. 

IN A, (STATUS) |get the receiver status byte 

AND RXRDY I mask to see if an character received 

JR NZ,RDCHR f nonzero means yes 

LD BC,6 felse check console status for keyboard 

LD DE,0FFH (character using function A, FFH is input flag 

CALL DOS | make the call 

°R A I zero value (null) means no character ready 

JR NZ, SNDCHR I nonzero means we have one to send, no echo 

JR MAIN I repeat loop 

Print An Abort Message Before Passing Control Back To Kaypro 



LD 
LD 
CALL 
JP 

BYTE 
DATA 
BYTE 



DE.BYE 

BC.9 

DOS 



I return to operating system 



13 • BYTE 10 ! BYTE 10 

'Exiting KTERM' 

'•' 



Primary Output To. Computer Vector 

Also checks for an abort character, which never gets sent to computer 
if detected. ~ is abort character. 



lis character ~_| or escape character? 

lyes, abort 

I else save it 

lis the transmitter empty so we can send? 

I mask status byte to find out 

I zero means transmitter is busy sending 

lyes so get character back 

land send it 

Ihurry back to the main loop 



CP 


1FH 


JR 


Z, ABORT 


PUSH 


AF 


IN 


A, (STATUS) 


AND 


TXRDY 


JR 


Z.QCHR1 


POP 


AF 


OUT 


<DATPRT),A 


JR 


MAIN 
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l 
I 
I 

rdchr: 



If Ws Get Hers We Have A Character Fro* Computer 



STACK: 



LD 


A,3 


CXJT 


(STATU8>,A 


LD 


A.DTRWT 


OUT 


< STATUS), A 


IN 


A, (DATPRT) 


LD 


E,A 


LD 


BC,Z 


CALL 


DOS 


LD 


A, 5 


OUT 


(6), A 


LD 


A.DTRRDY 


OUT 


<6) ,A 


JR 


MAIN 


RSRV 


16 


END 





.select the proper SIO register for controls 

I mat the wait flag 

I get and print incoming 

I character 

I through standard DOS call so Kaypro can keep 

(track of cursor position than 

Iclear the wait flag to tel 1 computer we art 

Irsady for next character 



tand hurry back to main loop 
la 16 byte local stack 



The source code for this simple program is shown in listing 
one. If you are following my "NEW-DOS" project, you should 
have a copy of the CROWE assembler. This assembler is 
available from the new TCJ Public Domain Library, and upon 
the NEW-DOS project disk. 

Designing Turnkey Systems With MENU.COM 

While awaiting the manual for ZCPR3, I have been working 
with the ZCPR3 "shell" MENU.COM. This is a very powerful 
system level menu program. To support AMPRO users I have 
developed a number of "turnkey systems," based upon this 
utility. 

All the turnkey systems I am working on are prepared using 
the stock AMPRO ZCPR3 CP/M operating system, revision C, 
AMPRO Part Number A60101, on a dual floppy Series 100 using 
the IB Little Board. MENU 3.6 is a true ZCPR3 utility, and you 
must assure that you have either properly installed the utility, 
or are using the AMPRO system noted. AMPRO has installed a 
number of utilities on the revision "C" system disk. All that is 
required is a good text editor to create powerful turnkey 
systems. 

If you acquire one of the systems I have configured, several 
steps are required to make the disk operational. 

Using your normal system working diskette, format and 
sysgen a blank disk. No operating system is supplied on any TKS 
or TCJ User Library Disk. Transfer the entire contents of this 
disk onto your freshly prepared disk with your favorite copy 
utility. PLACE NO OTHER FILES UPON THIS DISK AT THIS 
TIME! 

With the new working copy of the TKS disk in drive "A" go to 
the CP/M prompt and enter : 

CRC<RETURN> 

your TKS disk will then report upon the status of all files by 
checking the CRC value of each file now on the disk, with the 
CRC values of the files at the time the disk was created. If you 
have made an accurate copy, all CRC values will match. In the 
case of a mismatch, recopy the file until all values do match. 

Now transfer your terminal attribute file, (MYTERM.Z3T), to 
the working disk. It is assumed that your sysgen image has 
properly set your operating environment to match your ter- 
minal. Transfer also, at this time, the following AMPRO 
Utilities from your system working disk onto the TKS disk : 

LDR.COM 
MENU.COM 



Using the AMPRO CONFIG utility, modify the Autocom- 
mand, (option 5) to "TKSTART." Now place the TKS disk in the 
system drive, and reset the computer. If the menu does not 
properly appear on your screen, repeat all of the above steps. If 
this fails, consult your AMPRO User Manual. 

When the menu appears, press the "H" key to enter the on-line 
help system. The first screen of this system will describe any 
other programs you may need to complete the system. While I 
have attempted to build turnkey systems using only public 
domain software, there are cases where you will have to install 
a commercial program of choice, such as a text editor. The help 
sysstem will describe what is needed, and how to install the 
program of concern. 

If you have a public domain program that will do the job of 
any commercial program required for a TKS disk, send it to me 
and I will modify the TKS disks concerned to use your program. 
In this way you can help to do your part to support the people 
who are supporting you. 

Developing your own turnkey system is not difficult. A simple 
turnkey system is shown in Listing 2. 

All MENU files, (MENU.MNU) begin with a statement begin- 
ning with a dash. This defines the global options that are to be 
used in the operation of the MENU system. In the example the 
file begins with: 

i K ][ H ][ K It J[ It It ]t Jt It It It It It JC 11 It It It 

' Tha stataavnt "-dp*" atataa that MENU IB to display tha 

j icrtan which follows, Krol 1 tha Krfltn ba-fora displaying It. and 
| allow a C icciu to tha CP/M eoawand Una. Tha optiana 
availabla at tha opamng global daclaration ara: 



d - Display tflxt acraan which folic 
1 inaa of taxt. 



* text acraam la 22 



, p - Scroll tha icrtan bafora displaying tsxt acraam. 

j x - Allow salting HDaJ to tha CP/H coaaand llna with a *C, 

j (control -C> . 

I 

| c - Diaplay cnaaanrt linss aa tha progrsa runs. This Is a 

daouqqi nq option that la ussd whan you gat a "Structura Error." 
i 

' A tavt scraan is brackatad with tha pound aiqn, <"•">. Tha 

; propar foraat for a taut %crw*n la: 

a lapooartnq aa first charactarJ 

22 It naa of tawt 

] • <and anothar pound sign as a tarainatorl 

The text screen may contain nearly any character, except, of 
course, the pound sign. If your terminal is capable of reduced 
video or other highlighting, and you have installed the command 
in your 'MYTERM.Z3T" attribute file, you may insert the 
command for these attributes in the text file. These attributes 
are indicated by the characters : 
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LISTING 2 
-dp* 
3C 3C 3C It 3C K 3C 3C 3C 3t 3t 3C 3C 3C 3£ 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 3t 

H E R M I T SO F T M A R E ' S 

E-BA8IC4 PROGRAMMING SYSTEM 

(C) 1986 C. Thomas Hilton 

3C JC 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C JC 3C 3C 3C 3C 3C 3t 3C 3t 3C 3C 3C 

E-BASIC24 8ystam 001 



E - Run Editor < WordStar ) 
R - Run Compilad Program 
1 - Copy /Format Disk 
4 - NEWSMEEP 207 



C - Compila Sourca Film 
K - Kill ".BAK" Fllas 



2 - Sysgan Disk 

5 - Configura 

M - Manual Command 



3 - 8hoN Directory 
6 - Distribution Info 



lamprodsk 
2sysgan 
3(d 
4ns 

Seonf ig 
&:2 

Kara «.bak 
EMS 

M'-Entar Command: - 
C! COMPILE "Fila Nim? - 
RRUN "FILE NAME? " 
• 
3C 3t JC 3t JC 3C 3C JC 3C JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC 

COPYRI9MT NOTICE 

AND 

USE AGREEMENT 

JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC JC 

E-BASIC24 has baan darivad from tha BASIC-E compilar writtan at tha 
Unltad Statss Navy's Postgraduata School at Mont army California, by 
Gordon Eubanks Jr. That compilar is than public domain in tha pur as t tars that 
may ba appliad 



(and so on for 22 Unas of ta*t amr taxt scraan) 






(anothar taxt scraan of 22 Unas) 
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' A - turn on attribute 
A B - turn off attribute 

These attributes are entered into the file as normal text. Wor- 
dStar users are familiar with the technique of inserting printer 
commands in their text. To implement these codes the WordStar 
user would enter: 

A PA - turn on attribute 
A PB - turn off attribute 

How control characters are entered into a text file with your 
favorite text editor may be found in that program's manual. 

The text screen of 22 characters is closed with another pound 
sign. What follows this, 'end of screen marker," should be the 
commands to be acted upon by single key press commands, or 
additional menu screens. The example below presents examples 
of MENU command lines. 

lamprodsk 

2sysgen 

3!d 

4ns 

5config 

6:2 

Kera *.bak 

EWS 

M ! 'Enter Command : ' ' 

C1COMPILE "File Name? " 

RRUN "FILE NAME? " 

Each line following the screen terminator represents a valid 
ZCPR3 command line. Commands are entered as they would be 
entered at the "A0> " prompt, but must have the reference in- 
dicator noted in the first text screen. Additionally, functional op- 
tions may be inserted into the command structure. 

In command lines "1" and "2" no MENU command line op- 
tions are present. When the "1" key is pressed MENU will load 
and run AMPRODSK, passing control of the system to that 
program. When the program has terminated system control will 
be passed back to MENU. This is the Ampro definition of what a 
"shell" program does. 

In MENU command "2" the SYSGEN program would be run 
in a manner similar to that of the AMPRODSK program. This 
simplistic SYSGEN command line may be expanded for users of 
SYSGEN, Version 3. To place the system image on drive "B," 
from drive "A" the command line could read: 
2sysgen/a,b,, 

Command line "3" however, has a MENU option installed. 
When an exclamation follows a reference character, MENU will 
pause after completing the command sequence for a key press 
from the operator and display the message : 

MENU 3.6 - Strike Any Key - 

The use of this option is desirable when displaying a directory, 
for instance. Without it the directory screen produced by 
DIR.COM would be displayed, and then immediately overwrit- 
ten by the MENU text screen. By implementing the option : 

3!d 

(which is a sorted directory program similar to DIR.COM) the 
directory of the current drive would be displayed, and the 
system would wait to redisplay the menu until a key was 
pressed. Again, the command line may be expanded to include 
more complex directory calls. 



3!DIR •.BAK;ERA 
B:*.BAK;DIRB:V 



•BAK;DIR;DIR B:*.BAK;ERA 



Any command line that may be entered from the ZCPR3 com- 
mand line may be entered from the MENU command line. 
Command lines may be up to 200 characters, or the line length 
determined by your implementation of ZCPR3. 
As noted below there are other command structures as well. 

6:2 

Kera *.bak 

EWS 

M! 'Enter Command: " 

C! COMPILE "File Name? " 

RRUN "FILE NAME? " 

In the example "6:2" the pressing of key "6" will cause the 
second text screen to be displayed. The colon, in this application 
means, "GOTO SCREEN NUMBER TWO." In the example you 
will note that the command lines for text screen one are ter- 
minated by another pound sign. MENU assumes the text which 
follows to be another valid text screen. The user must assure 
that this is the case. At the end of that text screen another set of 
command lines may be installed, up to 255 text screens and 
command line sections! ! ! With this much power complete on- 
line help systems are very easy to develop. 

In the next set of examples file names and supplemental 
command lines are input to the MENU command line. 

M ! "Enter Command : ' ' 
C! COMPILE "File Name? " 
RRUN "FILE NAME? " 

The first of these examples cause the system to wait for a key 
press when they have completed their task, as indicated by the 
second character being an exclamation mark. The command : 

M! 'Enter Command: ' 

allows a manual command to be entered as if at the ZCPR3 
"A0>" prompt. The general rule is that the string following a 
prompt enclosed in quotes will fill the vacant portion of a com- 
mand line structure as shown in the next examples. 

C! COMPILE "File Name? " 
RRUN "FILE NAME? " 

In my version of E-BASIC the compiler is named COM- 
PILE. COM. Not an original name, but a fitting one. Too many 
people want to complicate simple tasks. The compiler needs the 
name of the text file it is to compile. MENU will ask for this file 
name and place it into the command line in proper format for 
the compile program to receive. In my E-BASIC the runtime in- 
terpreter is named, "RUN," of course. The same concept used 
to COMPILE a program is applied to the runtime interpreter. 

This insertion of a file name into the command line is a truly 
universal concept. The following concept is also available, as 
might be applied to my Modified Crowe Assembler : 

XICROWE "File Name? "BBZ 

which would insert the file name and add the assembly toggles 
as if the command were entered at the command line as : 

A: SYSTEM > CROWE CCP.BBZ 

This series of text screens and command lines may go on 
nearly forever, and whose format is nearly "free form." The 
basic structure of the MENU file is as follows : 

-dp (global display options) 



text screen number one 
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command lines 

# 

text screen (if text it is screen 2) 

text screens or command lines for text screen 2 

# 

more screens and/or command lines 

## ( end of file marker ) 

The only real defect I have found in using this shell is the 
limitation of a single key command. While this is a normal, and 
very powerful system, I have found several cases where a two 
character command would have made life a great deal easier. 

There are other MENU commands which reference ZCPR3 
command formats, which are loosely referred to as 
"variables," by the sparse documentation in the Ampro User 
Manual. 

$D - Current Disk 
$U - Current User 

$FN - A reference to a ZCPR3 system file name and type num- 
ber "N" 
$Nn - A reference to a ZCPR3 system file name number "n" 
$Tn - A reference to a ZCPR3 system file type number "n" 
$$ - Place a $ in a command line 

I may be retarded, but I have never been able to make the '$" 
reference, or "variable" work on the basic 60K ZCPR3 im- 
plementation. 

In multiple text screen files there are also commands for 
moving about within the menu system. 

< RETURN > - Rewrites the current menu on the screen 

"C - Control C exits to system if "x" option is installed in 
opening option list, (-dpx) . 
* - Jump to first text screen, (main menu) . 

< or , - Jump to previous menu. This command allows the 
comma to be shifted, ('<") or entered unshifted as these 
characters are generally found on the same key. 

> or . - Jump to next menu. This command allows the period 
to be shifted, ( ' > ' ) or entered unshifted as these characters are 
generally found on the same key. 

$ - Jump to the "System Menu," where a password is supposed 
to be required to use this function. The Ampro manual documen- 
tation makes no mention as to how to implement this function, 
and I have yet to make it work on my system. 

In the near future we will take a close look at ZRDOS. I have 
used this operating system to implement the AVS Voice com- 
puting system for the visually impaired. There are several 
critical tests I wish to perform upon ZRDOS before rendering a 
final evaluation. When I am given a product to review, or 
evaluate, I use it for a reasonable amount of time, testing it 
fully. I feel these are things that should not be rushed. 

This brief introduction to MENU.COM should, however, allow 
you to begin designing your own turn key systems. 

AMPRO User Disk Library 

By way of introducing the library, allow me to give a bit of the 
history of this library, and credit those who have made it 
possible. In the beginning there was TCJ. I met TCJ while 
working to develop technologies for the disabled concerning the 
Ampro Series 100 microcomputers. I needed a place to 
distribute my wares, most of which are released into the public 
domain. TCJ needed a user disk library. TCJ donated the disks, 
I contacted the librarian of the Charlottesville Virginia Kaypro 
User Group, (CKUG), who filled the disks with what they had. 
And it came to pass that no one cared much for the way most PD 
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disk libraries were organized. A disk was never released until it 
became filled with random selections. We felt that a library 
should be constructed like a library, and began sifting through 
the disks. I had in mind selecting files that could used on the 
AMPRO VOICE COMPUTING SYSTEM, for the blind, a time 
consuming task. And the publisher spake unto The Hermit, "Get 
The Damn Listing Done ! ' ' and The Hermit did comply, for when 
the publisher speaks, we poor galley slaves must listen. 

I have not gone through each and every disk, nor fully tested 
each and every file. However, these disks are not just filled and 
forgotten. Each disk is in a category, and the files it contains 
will always be the same. As an example, 'UTILITY.004" will 
always contain library and catalogue programs. As long as 
there is room on the disk old versions will be placed in archive 
files, being replaced by new releases of the same class and type. 
New will replace old continuously. As I work my way through 
the library I will refine, sort, and adapt the disks. This is a living 
library, not a collection of files upon disks. When we get our BBS 
system on line then you will only have to refer to the category of 
disks and enter, "WHATSNEW" at the system prompt to see 
what files have been added, and what files have been replaced 
with newer versions. What follows is our 'BASIC LIBRARY 
CORE," the place were we begin building our library. 

The files are tested using a Kaypro 4-84 as a terminal, and 
some files may, at this time, be intended for use upon only a 
Kaypro computer. As I work my way through the files I will at- 
tempt to convert the files for generic terminal use, and Ampro 
machines. These disks are sent to TCJ in Ampro DSDD 48 tpi 
format. Other disk formats may be had by contacting TCJ with 
your format request. 

Special Library Services 

Due to distribution restrictions between TCJ and myself, a 
duplicate library will be established at TCJ and at "THE HER- 



MIT'S CAVE." Each issue of TCJ will have a listing showing the 
current state of the library. 

In addition to the normal copying, shipping, and handling 
charge for these disks, you may request a custom disk con- 
taining only the files you have a need for. I will provide this ser- 
vice based upon demand, though all shipments will be routed 
through TCJ. 

FREE Software, 2 for 1 

Often I will issue a call for special PD software. These calls 
will be for materials I require for my Public Domain selections 
for the disabilities, which have a special listing. If you send in a 
disk containing the software we are looking for, with source 
code and means of assembling or compiling same, (i.e. so I can 
modify it for voice or other use) , I will send you two free library 
disks of your choice. 

If you convert a program to AMPRO format, update it, or just 
want to help your fellow computerists by donating a program of 
your own, I will send you two files for every usable file you send 
me. By usable I mean a file we do not already have, or one that 
is legally in the public domain, and can be used without cost by 
everyone. When donating original works be sure to send me a 
statement that you authorize its release into the public domain. 
Where there are duplicate submissions of a program type, 
preference will be given to works created with the languages 
contained in our library, (that we can distribute), or TURBO 
PASCAL. 

The costs of this special exchange program will be born by 
myself, not TCJ, whose involvement is concerned only with the 
distribution of library material. 

At this moment in time we need text editors, and good BASIC 
language source codes, so root around the disk graveyard, or 
just get creative! ■ 



THE BEST Z80 
ASSEMBLER ON 
THE MARKET JUST 
COT BETTER! 



NOW 
ONLY 



DON'T ASK HOW OURS CAN BE SO FAST 
ASK WHY THEIRS ARE SO SLOW! 



". . a breath of fresh air . ." 

Computer Language, Feb. 85 

". . in two words, I'd say speed & 
flexibility", 

Edward Joyce, User's Guide #75 




Now fully compatible with M80 
in Z80 mode with many exten- 
sions. Time & date in listing, 16 
char, externals, plus many other 
features. 

To order, or to find out more 
about our complete family of 
development tools, call or write: 

—STLFLSystems 

1622 N. Main St., Butler. PA 16001 
(800) 833-3061, (412) 282-0864 
Telex 559215 SLR SYS 



»s 



C.O.D., Check or 
Money Order Accepted 



m,n sec 1:17 3:26 5:25 6:13 

2Mhz 
8' SS/SO 



:06 :22 :4» 1:00 

8Mru 
Ram Disk 



SHIPPING USA/CANADA • $3 • OTHER AREAS ♦ $10 
Z80 CP/M compatibility reouired 



Registered Trademarks 

It is easy to get in the habit of using 
company trademarks as generic terms, 
but these registered trademarks are 
the property of the respective com- 
panies. It is important to acknowledge 
these trademarks as their property to 
avoid their losing the rights and the 
term becoming public property. The 
following frequently used marks are 
acknowledged, and we apologize for 
any we have overlooked. 

Apple II, II + , lie. He, Macintosch, 
DOS 3.3, ProDOS; Apple Computer 
Company. CP/M, DDT, ASM, STAT, 
PIP; Digital Research. MBASIC; 
Microsoft. Wordstar; MicroPro Inter- 
national Corp. IBM-PC, XT, and AT; 
IBM Corporation. Z-80, Zilog. MT- 
BASIC, Softaid, Inc. Turbo Pascal, 
Borland International. 

Where these terms (and others) are 
used in The Computer Journal they are 
acknowledged to be the property of the 
respective companies even if not 
specifically mentioned in each occuren- 
ce. 
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Z Corner 



(Continued from page 5) 

You can access any drive or user by 
specifying the Drive and User in the 
command. For example if you are in user 
area A5, and you want to transfer 
MYFILE.TXT which is in A3 to B6, and 
your file transfer program (the ZCPR3 
file transfer program similar to PIP is 
MCOPY) is in AO, you would enter the 
command: 

MCOPY B6 : A3 : MYFILE .TXT 

It would take a lot of work and 
duplicating files in the various user areas 
to accomplish this from CP/M 2.2. 

Once you become accustomed to how 
easy it is to access the user areas under 
ZCRP3, you can separate different types 
of files into different areas to make the 
directories less crowded. This is 
especially important when using a hard 
disk so that you don't have to look at 
directories with several hundred entries. 

Conclusions 

This first article only touched lightly 
on one aspect of ZCPR3, and I intend to 
continue with more detailed information 
on its utilities in the next issue. Please 
send in your questions, tips, and com- 
ments to share with others. ■ 



GET PUBLIC DOMAIN SOFTWARE! 
HUNDREDS OF FREE PROGRAMS AVAILABLE TO COPY! 

PUBLIC DOMAIN Software <s not copyrighted so no tees to pay' Accounting data-base 
business games languages and utilities <ree tor the taKing Some o f these programs sold 'or 
hundreds of dollars before being placed in Public domain join hundreds of ^sers enjoying a 
wealth of inexpensive software Copy yourself and save 1 
USER GROUP LIBRARIES 

IBMPC-SIG 1-390 Disksides 

IBMPC-BLUE 1-154 Disksides 

SIG/M UG 1-240 Disksides 

CP ; M UG 1-92 Disksides 

PICO NET 1-34 Disksides 

KAYPRO UG 1 -54 Disksides 

EPSON UG 1-52 Disksides 

COMMODORE CBM 1 -28 Disksides 

Get a PD User Group Catalog Disk - S5 00 PP — Specify Format' 
Library rentals are for seven ( 7 1 days after receipt three 1 3 1 more days grace to return '* you jse 
your credit card — no disk deposit Shipping Handlina and insurance S9 50 per ! ibrary Call 
(619) 727-1015 for 3 mm recording Call i619i 941 -0925 orders and tech info 

NATIONAL PUBLIC DOMAIN SOFTWARE =s== 



Rent 


Buy 


S410 00 


S850 00 


3175 0C 


3435 30 


Si 55 00 


S650 00 


S 45 00 


S250 00 


S 25 00 


S100 00 


S 65 0C 


5200 00 


3 65 0C 


S200 00 


S 25 00 


S 65 00 



DINERS 
CLUB 



1533 Avohill Drive. Vista. CA 92084 
1-800-621-5640 wait lor torn, dial 78ZS42 



AM EX 



INDEXER Listing 2 



( Continued from page 32) 



Name : 
[f Na* 



GetStr I 

- 'F10* then fxitl 



Here's the function: 

Function GetStr : Strl 
VAR Stat : Bool earn 
Key : Chan 
Raturn : Strl 
Count : Bytel 
StrVal : StringC2Jl 
Begin 

Return :» * ' I 
Key :- »0I 
Count :- 01 
Stat :- Falsel 
Repeat 

I-f Keypressed then Stat 

If Stat then 

Begin 

Read (kbd, Key) I 
Case Key of 

#27 : Begin 



If KeyPressed then Read ( kbd, Key ) I 
If Key InC»59..«6SJ then 
Begin 

Str (0rd(Key)-38,StrVAl ) I 
GetStr :- 'F" ♦ StrVal I 
Exit I 
End 
Elae 

Begin 

GetStr :• Key) 
Exitl 
End I 
End I 
Begin 

GetStr :- Return I 
Exit I 
End) 

If (Count > 0) then 
Begin 

Return :■ Copy (Return, 1 ( Length (Return) - 1>( 
got ox y (Mherex-1 ,Mherey) I 
WriteC - >| 

got ox y < Mherex-1 , wherey ) I 
Count : ■ Count - 1 1 
End! 



C <- put here all characters to be accepted noreally) 



: Begin 

Return :• Return ♦ Key I 
Count :- Count * II 
Hrite(Key) I 



End! 
Endl (case) 
Stat :• Falsel 
Endl (if> 
Until (Key - *13> I 
Endl <f uncti on> 
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( Continued from page 51 ) 

1991 NEWS 

A newspaper report from the year 1991. . . 
"IBM LAW FIRM COSTING 
MILLIONS... Recent reports indicate 
that law firms representing IBM have 
made millions in the last few years. Bet- 
ween IBM's attack on unauthorized 
copying and the attacks against IBM's 
products, several law firms have collec- 
ted multimillion dollar fees. Most of the 
action started in the mid eighties, and 
have involved unfulfilled promises, 
changes in product lines, and delays in 
production of new items. " An attorney in 
the actions was heard commenting on the 
cases; "it all started when management 
thought they had squeezed all the little 
guys out, could force users of old systems 
to buy new products, they started in- 
creasing cost excessively, figuring they 



had a captive audience that would buy at 
any price. Unfortunately they paid little 
attention to quality and the promises of 
their sales force..." 

In the same paper 

"APPLE SELLS 1 BILLIONTH AP- 
PLE II... A celebration was held today 
as the 1 Billionth Apple II came off the 
assembly line. Although the company 
has improved its sales of Macintosh like 
units, the major seller is still the Apple 
II. The mid eighties introduction of 
Macintosh support cards for the II has 
guaranteed the product well into the mid 
nineties." 

Also.. 

"AT&T DROPS COMPUTER LINES... 
AT&T dropped their seventh computer 
line and vows to stay out of computer 
manufacturing. Despite the company's 
standing with UNIX, it never has been 



The Computer Journal / Issue #23 

able to penetrate the user arena and sell 
complete systems. UNIX which was once 
considered the software of the future has 
since become almost unheard of. Some 
vendors have hidden UNIX under other 
operating systems, and thus became 
user friendly, a problem with UNIX from 
the start " 

Lastly.... 

"Small Business Administration An- 
nounces Largest Mom & Pop 

Business.. Computer Support The 

administration today released figures 
which indicate that more 'mom & pop' 
businesses have developed to replace the 
large number of business failures of 
computer retail outlets. During the late 
eighties, a number of businesses went 
broke and left millions of products un- 
supported and opened up a considerable 
market for small operations. These 
businesses are one and two person 
operations providing either walk in or 
over the phone lines service. Support 
operations are restricted to usually one 
product and may have national 

distribution " 

A short note... 

"USERS GROUP MAKES 1000th 
USER DISK. The original SIG/M users 
group which has supported CP/M80 
systems from the beginning in 1975 has 
just released their one thousandth user 
disk. Despite some industry spokes 
people who have been saying CP/M is 
dead, this group has continued to provide 
new and free public domain software for 
CP/M80 users " 

What Will Come True 

All these quick little teasers should 
have brought to mind, either fears or 
joys. Most of us users, especially those 
working directly or indirectly in the 
business, have most likely considered 
some of these ideas of late. With the in- 
dustry in major upheaval and shakeouts 
happening daily, all the stories above are 
possible but only time can tell. Keeping 
these stories in mind let's now talk about 
buying that ideal system. For most 
people these days an ideal system is sim- 
ply one that will last at least five more 
years. About the only thing we know for 
certain to happen over the next five 
years is the cost/ performance ratio will 
continue to improve. 

The cost performance ratio is a 
relationship between hardware ability 
and your cost. We have seen the cost of 
memory chips decrease as their size has 
increased. Competition has also dropped 
prices, but as we have seen lately, com- 
petition can also cause business failures 
Those controlling manufacturing will 
add some stability to the pricing system 
in the next five years by limiting the 
production capacity. Too many com- 
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panies got burned over the last year and 
will not allow that to happen again. I 
would predict that items in the future will 
reach a stable price shortly after in- 
dustry wide acceptance. Items that have 
been replaced will go up in price as 
production is shifted to new items. For 
the user this translates to more memory 
for the same price as long as you con- 
tinue to upgrade. System pricing will 
more likely be governed by use, than by 
hardware design. 

The current level of hardware 
development is now mostly a "cook 
book" operation. The great GURU'S of 
hardware have been replaced by VLSI 
designs and anybody can build a system. 
Manufacturing skills are becoming more 
automated, and automatic testers help 
companies crank out thousands of 
working units a day. To see this you need 
look no further than the PC clones which 
are so numerous. Prices are as low as 
$175 for a 128K PC compatible mother 
board. Complete systems can be built for 
less than $700, which has changed the 
whole way of looking at personal com- 
puters. If cost is the determining factor, 
then last year's business systems have 
become this year's home systems. 

For many years the $1,000 limit 
marked the dividing line between per- 
sonal and business systems. As most of 
us know, that figure is for a basic system 
and will likely double before a full 
system is put together. This last year has 
produced many new systems at this cost 
level (thanks to over production), and 
most of the advancements have been ex- 
tra features for the same dollar. Some 
vendors have really jumped ahead by 
using newer chips (Mac) but found hard 
times instead of prosperity. This further 
supports the statement that it is software 
and not hardware that sells a system, 
and this will be true for the next five 
years. 

New Software 

When software has been developed for 
the home cost has always been low, 
typically under $100, often $19.95. For 
business use the opposite has been the 
rule, with prices typically $500 a 
package, and the really good stuff $1,000 
and up. In truth the sale price seldom has 
any bearing on the actual cost of produc- 
tion or development. There are so many 
different ways that software can be 
created that price can not be used as a 
guideline for finding good software. One 
software company may steal a program, 
another may spend several years 
working on it, yet the market may only 
be willing to pay based on how slick the 
sales campaign is. Some of the best sof- 
tware in many cases has been free, 
mainly public domain programs. 

To look at the future of software, we 



must see the changes that have happened 
over the past. Public domain software 
has been around from the beginning and 
will most likely stay for some time. 
These programs usually start as one per- 
son's work and are then put in public 
domain with the source code. The 
availability of the source code allows 
others to fix bugs, make improvements, 
customize the system and generally 
make the programs a mature product 
(some software houses could learn from 
this). As so many of us have found out, 
many software houses do almost as 
much to keep you from using the 
program as they do to let it be used 
properly. This fear of "pirating" the 
program has become such a problem 
that many programs now exist that can- 
not be used or backed up, which would 
make their cost excessive even if they 
were free. 

If we exclude cost as a factor in deter- 
mining software selection (along with 
hardware design), user friendliness and 
adaptability become major con- 
sideration. As with public domain 
programs, I rate availability of source 
code, support, and documentation all just 
as equally important. I have recently 
used a mouse type system (considered 
friendliest) and found some advantages, 
mostly however I have found short 
comings. This friendliness also costs in 
memory load times and space. Current 
hardware cost makes only loading time 
of any concern, as most new systems are 
over 500K of memory. This all makes me 
feel that the newer software will help the 
new user considerably (friendlier), but 
provide a less useful systems (mice are 
slow) to the old "hacker". 



Choosing That New System 

While considering what to cover, I got 
involved recently with an old and a new 
system. The old system was a collection 
of parts purchased at swap meets. The 
new is an Atari 520 ST with ail the win- 
dows and mouse functions (user frien- 
dly). Many issues back I had talked 
about system integration, mostly about 
S-100 but also about systems in general. 
Choosing one's ideal system really is not 
much different from integrating a 
system. All the same concerns, fears, 
and problems are present in any type of 
system selection. 

My friend's reason for selecting the 
used S-100 components was two fold. His 
hardware knowledge is low and he would 
like to improve it by some hands on 
"tinkering". He has not had much ex- 
perience with CP/M 80 because his other 
systems have been TRS-80 and the 
COCO. We purchased a 520ST at work to 
use in emulating more expensive color 
units, with a look at some extra benefits. 
Neither of the two projects are intended 
to be "IDEAL SYSTEMS" but each can 
give us some help in meeting that goal. 

In choosing a system, the first order of 
business is to decide why you need it, 
then what it will do, how often must it do 
it, who will support it, and where you will 
go for support. In both cases the reason 
for having the computer system started 
the process. Most often those who 
already have a system can loose track of 
"why" they got it, while new users may 
not be sure at all. My friend's choice of 
improving his hardware knowledge is a 
sound choice, while using the 520 for 
emulation may not be. Let's see how 
clarifiying this first choice effects us for 
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the future. 

Hardware will be changing some in the 
future, mostly with more VLSI circuits. 
Someone wanting to become better at 
hardware, either in computers or items 
using microprocessors, should then get 
involved with the newer components. My 
friend will learn about the S-100 stan- 
dard, but will fall short on new 
technology. His system has cards which 
are already 7 and 8 years old, it can be 
upgraded, but he will likely end up 
replacing everything, including the noisy 
bus. So here is the first stumbling 
block— to learn fundamentals or to learn 
the newest items, an S-100 is a good 
choice, but make sure the equipment is 
capable of newer or different functions. 
Other choices might be the Heathkit 
Education system, which can be expan- 
ded into a full MSDOS system. He could 
also use his current COCO as a basis for 
building up small projects and inter- 
faces, all using old and new components. 

While software could be part of the 
emulation decisions, it is actually the 
hardware that makes a 520 a good choice 
for graphic emulation. The 520 is based 
on the 68000 by Motorola, and is my 
choice of the CPU of the next five years. 
A very important design advantage of 
the ST is the off-loading of functions from 
the CPU. The Mac suffers from an over 
worked CPU (it does everything) while 
the ST has three other VLSI (CPU's) 
devices. The 520's RGB output will drive 
many different types of monitors and this 
will allow us to upgrade monitors while 
still keeping the same interface har- 
dware and software. Currently the color 
terminals are all one unit, with a rather 
poor monitor built in. The terminals are 
left on 24 hours a day and so we can ex- 
pect to replace at least one monitor a 
year. The hardware part makes this a 
good choice, except that someone must 
write an emulation program for these 
terminals. Once done this will make 
upgrading faster (we hope) which is why 
the next stumbling block in choosing a 
system is "what is needed". 

What Next??? 

The "what is next" kills many people 
after they bought that ideal system. I 
have heard too many stories about taking 
it home and then discovering how much 
extra is needed to make it run. When my 
friend called and said he had this S-100 
stuff, I then spent 10 minutes telling him 
all he will need to do, just to bring the 
system up for the first time. To say he 
was stopped in his tracks a bit, would be 
a major understatement. It took me over 
6 months to get my first system to run, 
and then only with the help of the original 
designer. A common problem of people 
who have used packaged systems, is 
their lack of familiarity with how much it 



took to get to that point, and worse, how 
much more to get to the next step. 
Another magazine has recently started 
covering the PC clone, more because 
they discovered how much cheaper and 
simpler it is to use a clone as the basis for 
a development system. My friend will 
spend months (and more money) before 
he has an operating system, and yet for 
the same or less money he could have a 
running system with room to expand 
(and build) . Due to the lack of S-100 sales 
you will find only slight price drops 
(mostly memory), and fewer parts 
available on the used market (lots of PC 
parts). So if you want to tinker expect to 
use PC clones, this will be the situation 
probably, for the next five years. 

The 520 is a new item, and has not been 
written about much yet. Our use has 
already hit a snag, as Atari only takes 
cash orders for their development sup- 
port package. To write good software, 
and get a look at their schematics, you 
will need this package. Our company has 
a policy of buying only with purchasing 
orders, so at present we can not get the 
support package, a $300 dollar extra that 
is needed if you intend to do anything 
other than use canned software. This 
package also contains the C assembler 
and linking packages needed to write our 
emulation program. In the future 
however there will be plenty of SIG 
(special interest groups) support as well 
as books that could help with this 
problem. You only need to look at the 
speed at which the PC group has ob- 
tained well over 150 public domain disks 
to see how future support of any product 
can be enhanced by SIG's. The few 520 
software packages are currently under 
$50, which is a big contrast to the PC. The 
"what is next" part of complete systems 
is becoming software and in the next five 
years will become the major selling (or 
breaking) point of any system. There are 
plenty of groups fighting for survival in 
software and with the Turbo Pascal suc- 
cess (cheap and good programs) you can 
expect to see plenty of under $100 sof- 
tware packs in the coming years. 

How Often??? 

A common problem or question is how 
much use will the system get. My friend 
will be lucky to use the S-100 for 5 to 10 
hours a week. This I feel is typical of a 
second system, but would it be the second 
system if it was a clone? A full running 
system, where you removed one expan- 
sion card and inserted your project card 
would most likely see much more overall 
use. However once you have established 
a software base, few will have the money 
to buy all new software for a second 
system. Our 520 however has a different 
problem with its use level— it will be on 
continuously. Can the 520 hardware take 



it? But then again could a clone? I feel 
that most of the current hardware, and 
most of the new hardware as well, will be 
more than adequate. It seems that most 
manufacturers are making everything of 
the same quality, while some are 
producing what is called industrial 
quality. Recently I saw IBM's version of 
their PC for industrial use. They said it 
had been beefed up some and was ready 
for rather harsh use. I felt that they had 
just made a tighter box, put in better 
filtering, and used a cheaper but more 
dust proof keyboard, all for twice their 
normal cost. 

When looking for items that can be 
used continuously, the more expensive 
are not always better products. What you 
can do is separate out those components 
that have high usage or shorter life 
spans. Typically this amounts to 
keyboards and disk drives getting most 
of the abuse. The video monitor on the 
other hand will fail when the screen 
(filaments) life expectancy is exceeded. 
Either item can be looked at as 
replaceable items and should be inex- 
pensive enough to allow frequent 
replacement. Cost in these cases is based 
on the number of suppliers, and systems 
using standard items (many manufac- 
turers) will remain inexpensive. I have 
considered the emulation use to be very 
light on keyboards and drives, which is 
why we prefer a monitor that can be 
easily replaced. This will also prevent 
dealing with our original terminal sup- 
plier who has eliminated support for 
their older products. 

Support 

Our computer club was one of several 
groups asked by Digital Research Inc. if 
we would support CP/M. It seems that 
DRI is no longer supporting their produc- 
ts and is trying to find some alternate 
means. Both hardware and software 
companies have found out the nature of 
real support and especially the true cost. 
DRI who is no longer selling their CP/M 
80 software, must still support it in some 
way because they have as yet to release 
the source code. One of our officers first 
comment on the idea was, " Will they 
give us the source code??". I ran into 
similar problems with the Superbrain, 
the source code was not available for 
their real BIOS, and the company would 
not release it even to the three support 
centers. This is all typical of the fears 
and concerns which companies have 
over their own software. The amount of 
technical support a company must sup- 
ply is inversely proportional to the 
amount of source code they provide (free 
or otherwise). No code equals lots of 
calls. I would expect to see considerable 
changes in this respect over the next few 
years and by 1991 at least some changes 
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in how support is handled. 

Most companies have chosen to pass 
support to their OEMs or dealers. This 
idea was to make it easier and faster to 
get support. It has failed rather 
miserably due to the rather low skills 
level of most dealers. I have also found 
that many of the dealers have little more 
than the same manual you receive with 
the package. This poorly written 
document, usually does not answer 
anything but basic questions. This is 
especially true if you are dealing with old 
S-100 equipment. My friend's system is 
beyond support as most companies are 
no longer in business and the old manuals 
leave more questions unanswered than 
they answer. His support will be from 
other users and clubs. Our emulation 
project will be outside the normal use of 
the system, and the factory will be of lit- 
tle help, if at all. This all indicates that 
some other form of support is needed. 

Where To Go For Support 

To solve the major support problem 
will take lots of action and input from all 
users to effect any changes. If all clubs 
would respond to DRI's request by 
asking for the source code, they might 
realize that putting it in public domain 
frees them from any form of support. 
The public domain groups are already 
set up to handle support of software and 
distribution. This network of support and 



information distribution is far more suc- 
cessful and complete than any manufac- 
turer could ever put together, what more 
it is free. My vision of the future contains 
as much hope as realistic insight that 
companies will put their old software and 
product information into public domain. 
However I strongly feel that expansion of 
the use of computers is currently hinged 
on this one aspect. Should companies 
continue to restrict their access to sof- 
tware and hardware details, I can only 
foresee continued declines in use and 
sales of systems. Those companies that 
make information available (even at a 
price) will on the other hand see an ex- 
pansion of their use, the future is really 
up to them. 

For hardware buffs I especially see a 
problem for the newer VLSI devices 
which may not become available to the 
average user. A point in mind is the Atari 
520's video controller. This special chip 
will be needed if someone wants to create 
a 520 for the S-100 bus. This aspect of 
running one type of software in a dif- 
ferent system is hampered by the use of 
non-standard VLSI circuits. However we 
can foresee that these devices are getting 
more intelligent each year and in five 
years it all may be a mute point. To ex- 
plain this point, consider how intelligent 
peripherals have become. It should not 
take too much more time before the en- 
tire operating systems will be on the disk 



controller chip. Another example might 
be putting the entire GEM system on a 
single chip that takes mouse inputs and 
turns them into system commands (such 
as disk commands). This all leads to 
what I expect to see in 1991, a universal 
interface language, that allows different 
processors to talk among themselves and 
peripherals directly. 

1991 

When looking into my crystal ball for 
1991, I see several things which one 
should keep in mind when purchasing 
equipment in 1986. We know for certain 
that there will be improvements in the 
nature and type of devices available. 
Their intelligence will continue to im- 
prove, making more advanced systems 
possible with less work on our part. I ex- 
pect to see some older systems being 
used for intelligent interfaces to these 
newer items, thus keeping some parts of 
older investments useful, long past their 
design expectancy. There will be some 
newer chips which should lead the way to 
this newer technology. I expect most 
newer products will be based around the 
68000, and one such product is the NOVIX 
by the Forth group. This 68K based unit 
runs Forth code directly and will find its 
way into industrial controls before the 
year is out. 

The impact of optical disks is just 
beginning to come to people's attention. 
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and with the size and cost ratio im- 
proving it will not be long before systems 
based on their use start appearing. A 
system that I have been describing for 
several years now, will be based on the 
interactive abilities of the optical disk. I 
predict that by 1991 an educational 
system will be in most student's home. 
This system will most likely be built for 
the text book manufacturers, and sold to 
every family in America. The system 
will provide interactive and multimedia 
education similar to what is found in 
present day text books. The difference 
being that students will be asked 
questions after reading the text and 
should they answer a question wrong, the 
unit will return them to the correct place 
to reread the lesson. The interactive 
aspect of the system would allow the 
book makers to use video tape footage of 
actual history to replace pictures or 
descriptive text. The reason that the text 
book maker would be involved, is they 
already own and have all the material, 
and would only require moving it over to 
the new medium. 

Conclusion 

While writing this article I have tried 
to cover two views in answering the 
questions. Those views were what to look 
for in an IDEAL system and what 
changes to expect in the next five years. 
It was possible to see how your choices 
for a system may need some updating or 
more in depth research. The future 
system will be more powerful, but should 
the software not be adequate, you can 
waste that power. The use of older 
existing system will continue and may 
prove more useful than new ones. Newer 
system that shield the users from the 
system too heavily may in fact limit their 
use. The support problem will most likely 
get worse before help becomes easily 
available. Keeping that in mind, you 
should try and restrict your purchases to 
systems that you can repair and find 
present day support for. Many systems 
however will straddle the fence by 
providing somewhat more complex sof- 
tware than most can understand and yet 
have a standard enough system design 
such that support is a minimum aspect of 
the system (PC-clones). 

The two systems we talked about will 
undoubtedly do their job. Our friend may 
learn considerably more than he had 
planned, and will most likely have a 
system of less quality than he needs. 
While on the other hand our 520 may 
prove useful only after more money and 
time is put into the project than we had 
hoped for. It is possible to see that com- 
puter systems require certain amounts 
of flexible thinking to be used fully. The 
next five years will continued to see 
things get smaller and become more in- 



telligent. I expect that by 1991 hardware 
cost will be so low that truly a system in 
every home will be possible. That system 
however may not be a real computer as 
such but a complete learning system. 
That system will be used by a student 
from early school years well into college. 
The success of such a system will be 
mostly based on a standard interface and 
concept design which will come from 
outside the regular computer industry (a 
textbook company) . 

For myself, I expect to continue to use 
my Z80 S-100 system. The base of sof- 
tware and my understanding of how it 
works makes any major changes 
unrealistic. I will build and learn about 
other systems (68K), but my understan- 
ding and familiarity with my existing 
programs, makes it prohibitive to 
change completely. ■ 

• • • Editor's comments * * * 

No-Nonsense Licenses 

Most of the software copyrights and/or 
licenses have been overly restrictive, 
limiting the use to only one CPU. Some 
actually stated that if you replaced your 
computer, you would have to re-purchase 
or re-license your software in order to 
continue to use it on the new CPU. They 
also did not allow you to use the software 
on one computer in the office during the 
day and then take the software home to 
use on another machine in the evening. 

The good news is that Borland and 
Datalight have adopted a very realistic 
attitude about licensing, and we want to 
encourage others to follow their lead. 

Datalight's "No-nonsense License 
Agreement" for their C compiler 
(Datalight, 11557 8th Ave. N.E., Seattle, 
WA 98125) says that you should treat it 
like a book. It can be used by any number 
of people and freely moved from one 
computer location to another— just as 
long as there is No Possibility of it being 
used at one location at the same time that 
it is being used at another. There is also 
no license fee for distributed derivative 
programs. 

Borland's "No-Nonsense License 
Statement" for their Turbo Pascal ver- 
sion 3.0 also says that you should treat it 
just like a book. In fact, the details read 
almost the same as Datalight's, and I'm 
not sure who adopted it first. 

We should all encourage this develop- 
ment and let these companies know how 
much we appreciate their license, the 
fact that the programs are not copy 
protected, and the very reasonable cost. 
We should also recognize their rights and 
not pass out or accept copies which would 
violate their liberal agreement. If you 
know of other companies with these 
policies, send TCJ the details so that we 
can publish the information. ■ 
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system on me, I got very disturbed. We 
haven't been able to determine if there 
are bugs in the system or if we were 
doing things wrong. They do have a 
checking routine but all that does is 
throw you back into the system if you 
make a bad call. We will be trying to load 
a true Forth-83 later but for now I would 
like to hear if others are using this 
program or not. We think this machine 
has some real possible uses and are 
looking for a good software package to 



implement it in. Forth would be ideal but 
not if we have to write our own true For- 
th-83. 

Lastly for those other Forth-83 users, I 
am still working on the Forth in ROM 
project. I have purchased a used God- 
bout 68K CPU card and will be installing 
it in an S-100 system. My current plans 
are to do a Forth monitor/ROM for it and 
then try some operating stuff, (using the 
disk controller featured two issues back) 
all in Forth. I will keep you informed on 



how that is going, so till then... keep For- 
thing... 

Selecting the IDEAL System 

For those people who have been trying 
to find that IDEAL system let's talk 
some about what to look for and also 
what we can expect in the future. Let's 
start out by looking at some possible 
news articles, five years in the future. 

( Continued on page 46 ) 
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Well, this column will be longer than 
those in the last few issues, as many 
things are starting to happen. My term 
as editor of my local computer club's 
magazine will be over by the time you 
read this Although it has been fun and 
interesting it has surely hampered my 
output in these pages. This month I have 
included a schematic of a serial to Cen- 
tronics converter and will discuss a 
rather interesting electronics show. 

Serial to Centronics 

I have had an MX80 printer for a rather 
long time now and from time to time I put 
it on a serial only computer (Super- 
brain). Currently I change the serial 
converter card by opening the MX80. 
This removing screws and trying not to 
break cables has gone on too long so I 
have undertaken this quick fix. The card 
in Figure l is based on the idea that you 
will install it in a system (get all the 
serial lines setup) and move the printer 
around. This is necessary, I found out, 
due to the many different forms of han- 
dshaking. The circuit is rather simple 
and I will not go into details other than 
possible problems you may encounter. 

I built one unit and it worked perfectly 
at many baud rates. I could even use it 
without the single-shot (LS123). The next 
unit I built would not work without the 
single-shot and beefing up the — 5V sup- 
ply. I finally decided the problem is with 
the source of the RS-232 signal. Some 
drivers will work down to the (RS-232) 
specs lower limit of 3V, while others will 
not work properly below 5 or 6V on the 
negative side. I found that by using a five 
volt regulator for the other chips, and 
then supplying a separate 7 to 9.5 Volt 
source for the 1488 and 7660 devices, the 
unit could be made to work properly. I 
found a threshold of about 8.5V. The unit 
would drop a character below this, but 
run fine up to 9600 baud with voltage 
above it. Different systems have dif- 
ferent requirements, so as usual ex- 
periment for best operation. 

The main thing to keep in mind is the 
serial port must have handshaking. It 
needs to monitor a busy or not ready 
signal on the serial side. Should it be set 
up for X-on and X-of f protocol you might 
try the hookup as shown. I haven't tried 
this as yet, but think it should work just 
fine. The software will need to check for 
X-on/X-off received data after each 
send, this is usually at 2400/4800 baud and 



so most computers will have enough time 
to check the status. You must make sure 
that the output data is being continuously 
output, I have indicated using the ACK 
signal as a strobe, but have realized that 
a busy would never be cleared, as the 
needed strobe to send the OK would not 
have happened till after a completed 
send. This means some form of free run- 
ning single shot (or part of the baud rate 
generator) must be used to guarantee 
sending of status (X-on/X-off) regar- 
dless of printer condition. 

You have two versions of the UART to 
use; a 6402 and a 6403. The only differen- 
ce is a built in divider and crystal 
oscillator in the 6403 version. I bought a 
6403 but then decided to use the 4702 
baudrate generator when I had troubles 
at 9600 baud. Unless you intend to use 
9600 buad, try the 6402. It is cheaper and 
the 4702 will give you more options. In 
any case you can build a simple conver- 
ter with as few as 3 devices or worse case 
6 chips. 

WESCON 

Once every two years the WESCON 
electronics show happens in San Fran- 
cisco. This year the show only had elec- 
tronic vendors, compared with two years 
ago when the mini-micro computer 
exhibit shared the spaces. What I saw 
this year was quite different from last 
time. The number of finished or complete 
system products were noticeably 
missing. Although several exhibitors had 
systems (like VME bus) most were com- 
ponent manufacturers looking for new 
OEM's to buy their stuff. A very 
noticeable addition was the number of 
foreign countries present. The slacking 
off of computer and electronic sales has 
left many foreign countries with excess 
production ability. Our country's strong 
dollar has also helped to make off shore 
manufacturing a strong competitor in 
supplying raw products. 

We were looking for test equipment, 
mainly of the logic or emulation type. We 
found lots of products, most starting over 
$10,000 for a single type emulator. Some 
of the cheaper logic analyzers got almost 
as high when software emulation was 
added. One unit we saw and liked is the 
ORION work station. ORION (702 Mar- 
shall St. Suite 614, Redwood City, CA 
94603 415-361-883) makes what they call a 
development lab. This unit works with 
either CP/M or MSDOS systems and can 



emulate or replace a rather large num- 
ber of devices. We used it for several 
minutes and were quite impressed by the 
ease with which you could stop or find 
bugs in software. Its only drawback was 
true analyzer type functions. It is 
possible to monitor a number of lines at 
the clock rate and look for improper 
timing signals. Should your problem be 
spikes or minor timing variations this 
unit might not show them up. When you 
include this unit's ability to emulate 
ROMs at the same time it is looking at 
signals, the (4,000 price tag looks rather 
good. My favorite thing about the unit is 
that the utilities are all written in Forth. 
It was rather interesting to hear the sales 
person say how they don't mention Forth 
unless the user notices it. It seems they 
have gotten some rather strange reac- 
tions when they say Forth. 

Forth and 520ST 

I had a great idea the other day. We use 
$3,000 terminals at work, and they are all 
dying. Now replacing three of them at 
their current price didn't sound too good, 
but I reasoned that we could buy a new 
Atari 520 ST with color monitor and then 
emulate the old terminal. I further chose 
the only Forth package available to do it 
with. Now let me say I am really im- 
pressed about the 520 and may even buy 
one myself. The unit with the black and 
white monitor is OK but you will have to 
buy a color monitor to really enjoy the 
system. The color screen is really 
amazing, in fact their 80 by 24 color text 
is much better than some PC types I've 
seen and could be used all day long. 
There are not too many programs right 
now, but hang on because England has 
lots of people working on it. The 
operating system is a version of CP/M 
68K and in fact you can read 5V4 inch 
MSDOS disks. I've seen the competition, 
AMIGA, and for the extra money they 
charge, I feel the ST is a better buy. 
Later on I will have more to say about the 
insides, as I will be opening it up and 
probing around. 

The Forth system is 4xForth (four by 
Forth) by The Dragon Group. This was 
supposed to be a Forth-83 version, and 
based on other articles, I knew that a few- 
things were different. Let me say that 
more than a few things are dif- 
ferent—almost all of it is different. The 
ST takes about two minutes to boot up 
and when Forth kept resetting the 



